line |
true |
false |
branch |
72
|
0 |
268053 |
unless (defined $_[0] and defined $_[1]) |
75
|
0 |
0 |
defined $_ ? : |
80
|
29908 |
238145 |
if $_[0] eq $_[1] |
82
|
238089 |
56 |
if ($_[0] =~ /\./ or $_[1] =~ /\./) { } |
85
|
1307 |
474871 |
unless /\./ |
87
|
34688 |
203401 |
if $_[0] - $_[1] > 1 |
88
|
34407 |
168994 |
if $_[0] - $_[1] < -1 |
95
|
56 |
168994 |
if $can_rely_on_native and $native != 0 |
144
|
1060 |
36 |
&_bigfloatcmp($l, $r) >= 0 ? : |
154
|
7 |
38 |
&_bigfloatcmp($l, $r) <= 0 ? : |
176
|
425 |
448 |
if ($r =~ /\.\d+0$/) { } |
187
|
0 |
214 |
unless (defined $l) |
190
|
3 |
211 |
if (defined $r) { } |
191
|
0 |
3 |
if ($r eq $l) { } |
|
0 |
3 |
elsif ($r > int($l) + 1) { } |
200
|
0 |
214 |
if ($l == $r) { } |
204
|
37 |
177 |
if (&_bigfloatlt($l, $try) and &_bigfloatlt($try, $r)) |
208
|
37 |
177 |
if $ret |
215
|
1 |
353 |
unless /\./ |
223
|
177 |
2989 |
if (substr($l, $i, 1) ne substr($r, $i, 1)) |
231
|
176 |
1 |
if ($ret =~ /\./) |
242
|
176 |
1 |
if ($ret =~ /\./) |
248
|
2606 |
177 |
if (&_bigfloatlt($l, $try) and &_bigfloatlt($try, $r)) { } |