Branch Coverage

blib/lib/Scalar/Number.pm
Criterion Covered Total %
branch 44 50 88.0


line true false branch
72 0 3 if ((&max_natint() - 2) % 2 != 1)
0 0 unless overload::StrVal($_[0]) =~ /0x([0-9a-f]+)\)\z/
3 0 if ($@ eq '') { }
1 12 unless defined $meth
2 10 if ($@ ne '' or ref $newval ne '' and &_refaddr($newval) == &_refaddr($val))
2 47 if (not defined $val or ref \$val eq 'GLOB') { }
0 47 elsif (do { my $warned; local $SIG{'__WARN__'} = sub { $warned = 1; } ; BEGIN {${^WARNING_BITS} = "\x54\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x51\x55\x55\x55\x55\x55\x05"} 0 + (my $tval = $val); $warned }) { }
49 13 if ((my $tval = $val) == 0) { }
4 156 $b != $b ? :
160 5705 if ($a != $a) { }
156 5549 elsif ($b != $b) { }
1213 4336 elsif ($a == 0 and $b == 0) { }
290 250 if $val >= -9007199254740992 and $val <= 9007199254740992
38 212 if $val < &min_natint() or $val > 1.8446744073709552e+19
3 8 if $val & 1
11 201 if ($val > 18446744073709549568) { }
87 898 if $val & 1
42 706 if ($val == 0) { }
166 540 elsif (int $val != $val or &float_is_infinite($val)) { }
42 706 if ($val == 0) { }
162 544 elsif (int $val != $val) { }
4188 148 unless defined $cmp and $cmp == 0
69 79 if $a < 0
1420 208 unless $a >= $t and $b >= $t
0 208 unless $cmp == 0