Branch Coverage

blib/lib/Math/Formula/Context.pm
Criterion Covered Total %
branch 39 64 60.9


line true false branch
22 0 0 $value ? :
0 0 $value->isa('Math::Formula::Type') ? :
0 0 $value->isa('Math::Formula') ? :
0 0 !&blessed($value) ? :
52 0 !$value ? :
32 0 13 unless my $name = $args->{'name'}
33 0 13 &blessed($name) ? :
48 2 11 if (my $forms = $args->{'formulas'})
49 1 1 ref $forms eq 'ARRAY' ? :
75 0 4 unless my $def = $self->{'MFC_attrs'}{$name}
84 13 4 unless (ref $_[0])
86 0 13 $name =~ s/^#// ? :
90 4 2 if (ref $obj eq 'HASH') { }
2 0 elsif (&blessed($obj) and $obj->isa('Math::Formula')) { }
0 0 elsif (&blessed($obj) and $obj->isa('Math::Formula::Context')) { }
113 1 22 if (ref $name) { }
22 0 elsif (not ref $name and @_) { }
114 1 0 if not @_ and &blessed($name) and $name->isa("Math::Formula")
118 3 18 if @_ == 1 and &blessed($next) and $next->isa("Math::Formula")
121 1 18 if ref $next eq "CODE"
124 0 18 if &blessed($next) and $next->isa("Math::Formula::Type")
127 4 14 @_ == 1 && ref $next eq 'ARRAY' ? :
128 4 14 if (my $r = $attrs{'returns'})
129 0 4 $r->isa('MF::STRING') ? :
133 3 11 if (length(my $leader = $self->lead_expressions))
134 2 1 $data =~ s/^\Q$leader\E// ? :
150 0 1 @_ == 2 ? :
163 0 28 unless length $name
165 3 25 $name =~ /^ctx_/ ? :
166 0 28 unless ($form)
172 0 28 if $claims->{$name}++
199 12 0 $result ? :