Branch Coverage

blib/lib/Tangence/Object.pm
Criterion Covered Total %
branch 59 92 64.1


line true false branch
50 0 25 unless defined(my $id = delete $args{'id'})
51 0 25 unless my $registry = delete $args{'registry'}
101 2 2 if --$outstanding
103 2 0 if $on_destroyed
169 0 11 unless $smashkeys and @$smashkeys
172 0 11 if (ref $smashkeys eq 'HASH') { }
197 273 0 ref $self ? :
262 0 18 if $event eq "destroy"
264 0 18 unless $self->can_event($event)
266 15 3 unless my $sublist = $self->{'event_subs'}{$event}
290 0 23 unless $self->can_event($event)
311 0 6 unless my $sublist = $self->{'event_subs'}{$event}
315 4 0 if \@{$sublist;}[$index] + 0 == $id
367 0 47 unless my $pdef = $self->can_property($prop)
372 4 43 if ($callbacks{'on_updated'}) { }
374 0 4 unless ref $on_updated eq "CODE"
375 0 4 if keys %callbacks
380 0 121 unless ref($callbacks->{$name} = delete $callbacks{$name}) eq "CODE"
389 4 43 if $on_updated
406 0 16 unless my $watchlist = $self->{'properties'}{$prop}->callbacks
410 14 0 if \@{$watchlist;}[$index] + 0 == $id
422 0 3 unless my $mdef = $self->can_method($method)
425 0 3 unless $self->can($m)
432 2 1 if $mdef->ret
439 0 2 unless my $edef = $self->can_event($event)
455 0 4 unless my $pdef = $self->can_property($prop)
458 0 4 unless $self->can($m)
472 0 4 unless my $pdef = $self->can_property($prop)
476 0 4 unless $self->can($m)
488 2 2 if ($(Syntax::Keyword::Match/topic) == 3 or $(Syntax::Keyword::Match/topic) == 4) { }
2 0 elsif ($(Syntax::Keyword::Match/topic) == 2) { }
503 0 8 unless my $pdef = $self->can_property($prop)
508 0 7 unless $self->can($m)
517 0 45 unless my $pdef = $self->can_property($prop)
526 22 23 if ($how == 1) { }
23 0 elsif (my $code = $self->can("_generate_message_UPDATE_$dimname")) { }
557 4 2 if ($(Syntax::Keyword::Match/topic) == 2) { }
2 0 elsif ($(Syntax::Keyword::Match/topic) == 3) { }
573 3 3 if ($(Syntax::Keyword::Match/topic) == 4) { }
3 0 elsif ($(Syntax::Keyword::Match/topic) == 5) { }
600 3 6 if ($(Syntax::Keyword::Match/topic) == 4) { }
1 5 elsif ($(Syntax::Keyword::Match/topic) == 5) { }
2 3 elsif ($(Syntax::Keyword::Match/topic) == 6) { }
3 0 elsif ($(Syntax::Keyword::Match/topic) == 7) { }
617 1 1 if ($(Syntax::Keyword::Match/topic) == 2) { }
1 0 elsif ($(Syntax::Keyword::Match/topic) == 3) { }