| … | … | ||
|---|---|---|---|
| 549 | $pl->destroy; # destroys $ob | 549 | $pl->destroy; # destroys $ob |
| 550 | } else { | 550 | } else { |
| 551 | my $a_ = $pl->refcnt;#d# | 551 | my $a_ = $pl->refcnt;#d# |
| 552 | my $b_ = $ob->refcnt;#d# | 552 | my $b_ = $ob->refcnt;#d# |
| 553 | 553 | ||
| 554 | warn "player-scheduler refcnt ", $ob->name, " pl $pl_ref ob $ob_ref (C pl $a_ ob $b_)\n";#d# | 554 | warn "player-scheduler refcnt ", $ob->name, " pl $pl_ref/3 ob $ob_ref/3 (C pl $a_/1 ob $b_/2)\n";#d# |
| 555 | } | 555 | } |
| 556 | } | 556 | } |
| 557 | } | 557 | } |
| 558 | }; | 558 | }; |
| 559 | warn $@ if $@; | 559 | warn $@ if $@; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |