Branch Coverage

blib/lib/Math/Symbolic/Custom/DefaultTests.pm
Criterion Covered Total %
branch 82 108 75.9


line true false branch
78 29 7 unless $tree->term_type == 1
79 2 5 if $$tree{'value'} == 0
92 29 6 unless $tree->term_type == 1
93 5 1 if $$tree{'value'} == 1
106 2 2 unless $tree->term_type == 1
107 1 1 if $$tree{'value'} == 1
108 1 0 if $$tree{'value'} == 0
126 3 9 unless $tree->term_type == 1
152 2285 9058 if ($ttype == 1) { }
2503 6555 elsif ($ttype == 2) { }
6555 0 elsif ($ttype == 0) { }
194 33 35 if ($ttype == 1) { }
4 31 elsif ($ttype == 2) { }
31 0 elsif ($ttype == 0) { }
204 0 31 if $ttype == 1
205 0 31 if $ttype == 2
237 42 1924 unless ref($tree2) =~ /^Math::Symbolic/
243 566 1400 if ($tt1 != $tt2) { }
247 329 1071 if ($tt1 == 2) { }
109 962 elsif ($tt1 == 1) { }
962 0 elsif ($tt1 == 0) { }
248 10 319 if $tree1->name ne $tree2->name
251 0 319 if scalar @sig1 != scalar @sig2
253 1 330 if $sig1[$i] ne $sig2[$i]
260 1 105 if (defined $sp1 and defined $sp2 and $sp1 eq $sp2 and $sp1 ne '' and $sp1 =~ /\S/)
268 99 9 if $tree1->value == $tree2->value
274 434 528 if $t1 != $t2
276 0 528 if @{$$tree1{'operands'};} != @{$$tree2{'operands'};}
280 177 677 unless is_identical($_, $$tree2{'operands'}[$i++])
313 6 0 unless ref($o2) =~ /^Math::Symbolic/
319 4 2 $tt1 == 0 && $o1->type == 7 ? :
321 3 3 $tt2 == 0 && $o2->type == 7 ? :
357 4 11 if ($ttype == 1 or $ttype == 2) { }
11 0 elsif ($ttype == 0) { }
362 4 7 if ($type == 0 or $type == 1 or $type == 4) { }
6 1 elsif ($type == 2) { }
1 0 elsif ($type == 5 or $type == 6) { }
0 0 elsif (is_constant($tree)) { }
380 0 1 if $ttype == 1 or $ttype == 2
383 1 0 if ($ttype == 0) { }
385 0 1 if ($type == 5 or $type == 6) { }
452 0 32 unless (ref($t1) =~ /^Math::Symbolic/)
455 0 32 if (not ref($t2) =~ /^Math::Symbolic/ and ref $t2 ne 'CODE')
459 23 9 ref $t2 eq 'CODE' ? :
470 23 9 $is_code ? :
478 0 640 if $retry > $retries - 1
482 1736 900 if $$limits{$_} and not $$limits{$_}($num)
489 0 640 if ($@)
495 460 180 if ($is_code) { }
501 0 640 if ($@)
508 0 640 if (not defined $y1) { }
0 640 elsif (not defined $y2) { }
510 0 0 unless defined $y2
521 0 640 if $y1 + $eps < $y2 or $y1 - $eps > $y2