Branch Coverage

blib/lib/Tangence/ObjectProxy.pm
Criterion Covered Total %
branch 93 146 63.7


line true false branch
171 0 20 if ($dim == 5)
194 0 6 unless defined wantarray
196 2 4 unless my $mdef = $self->can_method($method)
210 3 0 if ($code == 130) { }
211 2 1 $mdef->ret ? :
248 0 7 unless defined wantarray
250 0 7 unless ref(my $callback = delete $args{'on_fire'}) eq "CODE"
253 2 5 unless $self->can_event($event)
256 0 5 if (my $cbs = $_subscriptions{$event})
264 2 3 if $event eq "destroy"
274 2 0 if ($code == 131) { }
285 0 2 unless my $edef = $self->can_event($event)
289 2 0 if (my $cbs = $_subscriptions{$event})
305 0 2 unless $self->can_event($event)
308 0 2 if $event eq "destroy"
331 0 8 unless defined wantarray
333 2 6 unless my $pdef = $self->can_property($property)
344 5 0 if ($code == 130) { }
365 0 4 unless defined wantarray
367 0 4 unless my $pdef = $self->can_property($property)
381 2 2 if ($(Syntax::Keyword::Match/topic) == 2) { }
2 0 elsif ($(Syntax::Keyword::Match/topic) == 4 or $(Syntax::Keyword::Match/topic) == 3) { }
392 4 0 if ($code == 130) { }
411 17 0 if (exists $_props{$property}{'cache'})
430 0 9 unless defined wantarray
432 0 9 unless my $pdef = $self->can_property($property)
446 7 0 if ($code == 128) { }
493 5 19 if ($on_updated)
494 0 5 unless ref $on_updated eq "CODE"
500 15 37 if $on_updated and not exists $args{$name}
502 0 37 unless ref($callbacks->{$name} = delete $args{$name}) eq "CODE"
516 0 18 unless defined wantarray
518 0 18 unless my $pdef = $self->can_property($property)
526 3 15 if (my $cbs = $_props{$property}{'cbs'})
527 3 0 if ($want_initial and not $smash) { }
0 0 elsif ($want_initial and $smash) { }
530 2 1 if $callbacks->{'on_set'}
531 1 2 if $callbacks->{'on_updated'}
537 0 0 if $callbacks->{'on_set'}
538 0 0 if $callbacks->{'on_updated'}
552 2 13 if ($smash)
553 2 0 if ($want_initial)
555 2 0 if $callbacks->{'on_set'}
556 0 2 if $callbacks->{'on_updated'}
571 12 0 if ($code == 132) { }
609 5 1 if ($(Syntax::Keyword::Match/topic) eq 'first') { }
1 0 elsif ($(Syntax::Keyword::Match/topic) eq 'last') { }
612 0 6 unless my $pdef = $self->can_property($property)
620 0 6 if (my $cbs = $_props{$property}{'cbs'})
626 0 6 if ($smashed)
630 0 6 unless $pdef->dimension == 3
641 6 0 if ($code == 133) { }
659 0 47 unless my $pdef = $self->can_property($prop)
666 47 0 if (my $code = $self->can("_update_property_$dimname")) { }
684 15 0 if ($(Syntax::Keyword::Match/topic) == 1) { }
709 2 6 if ($(Syntax::Keyword::Match/topic) == 1) { }
4 2 elsif ($(Syntax::Keyword::Match/topic) == 2) { }
2 0 elsif ($(Syntax::Keyword::Match/topic) == 3) { }
733 1 6 if ($(Syntax::Keyword::Match/topic) == 1) { }
3 3 elsif ($(Syntax::Keyword::Match/topic) == 4) { }
3 0 elsif ($(Syntax::Keyword::Match/topic) == 5) { }
770 0 3 if (abs $delta == 1) { }
779 4 9 if ($(Syntax::Keyword::Match/topic) == 1) { }
3 6 elsif ($(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) { }
806 2 2 if ($(Syntax::Keyword::Match/topic) == 1) { }
1 1 elsif ($(Syntax::Keyword::Match/topic) == 2) { }
1 0 elsif ($(Syntax::Keyword::Match/topic) == 3) { }
823 0 4 unless $self->can_property($property)
908 0 12 unless defined wantarray
921 12 0 if ($code == 134) { }