| line |
true |
false |
branch |
|
81
|
0 |
20 |
if ($radix < 2) |
|
87
|
16 |
4 |
if ($radix != 2) |
|
96
|
0 |
0 |
if ($radix == 2) { } |
|
97
|
0 |
0 |
if ($i == 0) { } |
|
119
|
14 |
118 |
if ($radix == 2) { } |
|
120
|
0 |
14 |
if ($i == 31) |
|
123
|
12 |
2 |
if ($i) |
|
132
|
14 |
104 |
if (++$$self{'digit'} >= $radix) |
|
148
|
0 |
371 |
if (_is_infinite($i)) |
|
152
|
29 |
342 |
if ($radix == 2) |
|
153
|
1 |
28 |
$i >= 31 ? : |
|
157
|
18 |
324 |
if (($i -= 1) < 0) |
|
170
|
1653 |
1723 |
if ($value != $int) |
|
177
|
71 |
1652 |
if ($radix == 2) |
|
181
|
1028 |
624 |
if ($radix == 10) |
|
188
|
562 |
139 |
unless ($value % $radix == $digit) |
|
199
|
0 |
835 |
if (_is_infinite($value)) |
|
202
|
23 |
812 |
if ($value <= 0) |
|
206
|
63 |
749 |
if ($value != $int) |
|
212
|
0 |
812 |
unless my(@digits) = _digit_split_lowtohigh($int, $radix) |
|
221
|
204 |
1029 |
if ($digit > $high_digit) |
|
224
|
206 |
823 |
if ($digit < $high_digit) |
|
233
|
46 |
809 |
if ($value < 1) |
|
236
|
0 |
809 |
if (_is_infinite($value)) |
|
242
|
0 |
809 |
unless my(@digits) = _digit_split_lowtohigh($value, $radix) |
|
249
|
281 |
959 |
if ($digit < $high_digit) |
|
261
|
36 |
66 |
if ($value < 1) |
|
264
|
0 |
66 |
if (_is_infinite($value)) |
|
309
|
204 |
35122 |
unless $n |
|
311
|
141 |
16 |
if (ref $n and $n->isa('Math::BigInt') and my $coderef = $radix_to_coderef[$radix]) |