… | … | ||
---|---|---|---|
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 |