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) ? :
44 0 !$value ? :
32 0 11 unless my $name = $args->{'name'}
33 0 11 &blessed($name) ? :
48 2 9 if (my $forms = $args->{'formulas'})
49 1 1 ref $forms eq 'ARRAY' ? :
74 0 4 unless my $def = $self->{'MFC_attrs'}{$name}
83 13 4 unless (ref $_[0])
85 0 13 $name =~ s/^#// ? :
89 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')) { }
112 1 22 if (ref $name) { }
22 0 elsif (not ref $name and @_) { }
113 1 0 if not @_ and &blessed($name) and $name->isa("Math::Formula")
117 3 18 if @_ == 1 and &blessed($next) and $next->isa("Math::Formula")
120 1 18 if ref $next eq "CODE"
123 0 18 if &blessed($next) and $next->isa("Math::Formula::Type")
126 4 14 @_ == 1 && ref $next eq 'ARRAY' ? :
127 4 14 if (my $r = $attrs{'returns'})
128 0 4 $r->isa('MF::STRING') ? :
132 3 11 if (length(my $leader = $self->lead_expressions))
133 2 1 $data =~ s/^\Q$leader\E// ? :
149 0 1 @_ == 2 ? :
161 0 28 unless length $name
163 3 25 $name =~ /^ctx_/ ? :
164 0 28 unless ($form)
170 0 28 if $claims->{$name}++
197 12 0 $result ? :