| line |
true |
false |
branch |
|
19
|
0 |
0 |
ref $_[1] ? : |
|
26
|
0 |
0 |
if ($_[2]) { } |
|
28
|
0 |
0 |
ref $_[1] ? : |
|
31
|
0 |
0 |
ref $_[1] ? : |
|
39
|
0 |
0 |
ref $_[1] ? : |
|
46
|
0 |
0 |
if ($_[2]) { } |
|
48
|
0 |
0 |
ref $_[1] ? : |
|
51
|
0 |
0 |
ref $_[1] ? : |
|
59
|
0 |
0 |
if ($_[2]) { } |
|
61
|
0 |
0 |
ref $_[1] ? : |
|
64
|
0 |
0 |
ref $_[1] ? : |
|
72
|
0 |
0 |
if ($_[2]) { } |
|
74
|
0 |
0 |
ref $_[1] ? : |
|
77
|
0 |
0 |
ref $_[1] ? : |
|
85
|
0 |
0 |
if ($_[2]) { } |
|
87
|
0 |
0 |
ref $_[1] ? : |
|
90
|
0 |
0 |
ref $_[1] ? : |
|
98
|
0 |
0 |
if ($_[2]) { } |
|
100
|
0 |
0 |
ref $_[1] ? : |
|
103
|
0 |
0 |
ref $_[1] ? : |
|
113
|
0 |
0 |
if ($_[2]) { } |
|
115
|
0 |
0 |
ref $_[1] ? : |
|
118
|
0 |
0 |
ref $_[1] ? : |
|
126
|
0 |
0 |
if ($_[2]) { } |
|
128
|
0 |
0 |
ref $_[1] ? : |
|
131
|
0 |
0 |
ref $_[1] ? : |
|
139
|
0 |
0 |
if ($_[2]) { } |
|
141
|
0 |
0 |
ref $_[1] ? : |
|
144
|
0 |
0 |
ref $_[1] ? : |
|
152
|
0 |
0 |
if ($_[2]) { } |
|
154
|
0 |
0 |
ref $_[1] ? : |
|
157
|
0 |
0 |
ref $_[1] ? : |
|
165
|
12678 |
0 |
ref $_[1] ? : |
|
172
|
0 |
0 |
ref $_[1] ? : |
|
181
|
0 |
0 |
if ($_[2]) { } |
|
183
|
0 |
0 |
ref $_[1] ? : |
|
186
|
0 |
0 |
ref $_[1] ? : |
|
196
|
0 |
0 |
if ($_[2]) { } |
|
198
|
0 |
0 |
ref $_[1] ? : |
|
201
|
0 |
0 |
ref $_[1] ? : |
|
209
|
0 |
0 |
if ($_[2]) { } |
|
211
|
0 |
0 |
ref $_[1] ? : |
|
214
|
0 |
0 |
ref $_[1] ? : |
|
222
|
0 |
0 |
if ($_[2]) { } |
|
224
|
0 |
0 |
ref $_[1] ? : |
|
227
|
0 |
0 |
ref $_[1] ? : |
|
245
|
0 |
0 |
ref($_[0])->_is_zero($_[0]) ? : |
|
281
|
0 |
0 |
if ref $exp |
|
332
|
0 |
0 |
if $class->_is_zero($y) |
|
342
|
0 |
0 |
if wantarray |
|
366
|
39546 |
32248 |
if ($xs eq $ys) |
|
367
|
0 |
39546 |
if ($flag) { } |
|
372
|
2036 |
37510 |
$class->_is_zero($za) ? : |
|
378
|
7379 |
24869 |
if ($acmp == 0) |
|
384
|
17493 |
7376 |
if ($acmp > 0) { } |
|
402
|
25682 |
12510 |
$ys eq '+' ? : |
|
415
|
0 |
0 |
unless length $xstr <=> length $ystr |
|
421
|
430 |
83 |
if ($xs eq '+') { } |
|
422
|
410 |
20 |
if ($ys eq '+') { } |
|
428
|
35 |
48 |
if ($ys eq '+') { } |
|
468
|
0 |
0 |
$str =~ /[^0](0*)\z/ ? : |
|
516
|
0 |
8106 |
unless defined $x |
|
517
|
1 |
8105 |
unless ref $x |
|
527
|
0 |
0 |
if $class->_is_zero($y) |
|
530
|
0 |
0 |
if ($class->can('_div')) { } |
|
548
|
0 |
0 |
unless ref $b |
|
554
|
0 |
0 |
unless ref $b |
|
562
|
0 |
0 |
if ($class->_is_zero($y)) |
|
566
|
0 |
0 |
if ($class->_is_one($x) or $class->_is_one($y)) |
|
572
|
0 |
0 |
if ($class->_is_zero($x)) |
|
583
|
0 |
0 |
if substr($y_bin, $len, 1) eq 1 |
|
600
|
0 |
0 |
if ($class->_acmp($twok, $n) > 0) |
|
615
|
0 |
0 |
if ($class->_is_zero($k)) |
|
683
|
0 |
0 |
unless $class->_is_zero($log2n) |
|
685
|
0 |
0 |
if $class->_is_even($h) |
|
701
|
0 |
77 |
if ($class->_acmp($x, $two) < 0) |
|
721
|
0 |
0 |
if $class->_is_zero($x) |
|
723
|
0 |
0 |
unless defined $base |
|
724
|
0 |
0 |
unless ref $base |
|
727
|
0 |
0 |
if $class->_is_zero($base) or $class->_is_one($base) |
|
730
|
0 |
0 |
if ($class->_is_one($x)) |
|
731
|
0 |
0 |
if wantarray |
|
738
|
0 |
0 |
if ($cmp == 0) |
|
739
|
0 |
0 |
if wantarray |
|
744
|
0 |
0 |
if ($cmp < 0) |
|
745
|
0 |
0 |
if wantarray |
|
785
|
0 |
0 |
wantarray ? : |
|
|
0 |
0 |
if $acmp == 0 |
|
786
|
0 |
0 |
wantarray ? : |
|
792
|
0 |
0 |
if $class->_is_zero($x) |
|
805
|
0 |
0 |
unless wantarray |
|
808
|
0 |
0 |
$class->_acmp($x, $pow2) == 0 ? : |
|
815
|
0 |
0 |
if $class->_is_zero($x) |
|
820
|
0 |
0 |
unless wantarray |
|
825
|
0 |
0 |
$str =~ /^10*$/ ? : |
|
832
|
0 |
0 |
if $class->_is_zero($x) |
|
849
|
0 |
0 |
$class->_acmp($x, $pow2) == 0 ? : |
|
850
|
0 |
0 |
if $is_exact == 0 |
|
851
|
0 |
0 |
if wantarray |
|
858
|
0 |
0 |
if $class->_is_zero($x) |
|
863
|
0 |
0 |
if ($str =~ /^10*$/) |
|
865
|
0 |
0 |
if wantarray |
|
870
|
0 |
0 |
if wantarray |
|
878
|
0 |
0 |
if $class->_is_zero($y) |
|
887
|
0 |
0 |
if ($y_len % 2 == 0) { } |
|
900
|
0 |
0 |
if ($xe < 0) { } |
|
922
|
0 |
0 |
if $acmp != 0 |
|
928
|
0 |
0 |
if ($acmp < 0) |
|
936
|
0 |
0 |
unless ($class->_is_zero($delta)) |
|
953
|
0 |
0 |
if $class->_is_zero($delta) |
|
976
|
0 |
0 |
if $class->_is_zero($y) or $class->_is_one($y) or $class->_is_one($n) |
|
981
|
0 |
0 |
if $class->_acmp($y, $n) <= 0 |
|
1021
|
0 |
0 |
if ($DEBUG) |
|
1032
|
0 |
0 |
$xe < 15 ? : |
|
1036
|
0 |
0 |
if ($DEBUG) |
|
1053
|
0 |
0 |
$xm > $xm_int ? : |
|
1058
|
0 |
0 |
if ($DEBUG) |
|
1081
|
0 |
0 |
if ($DEBUG) |
|
1093
|
0 |
0 |
if ($acmp < 0) |
|
1101
|
0 |
0 |
if ($DEBUG) |
|
1108
|
0 |
0 |
unless ($class->_is_zero($delta)) |
|
1114
|
0 |
0 |
if ($DEBUG) |
|
1134
|
0 |
0 |
if ($DEBUG) |
|
1141
|
0 |
0 |
if ($DEBUG) |
|
1145
|
0 |
0 |
if $class->_is_zero($delta) |
|
1152
|
0 |
0 |
if ($DEBUG) |
|
1180
|
0 |
0 |
if $class->_acmp($x, $y) == 0 |
|
1205
|
0 |
0 |
if $class->_acmp($x, $y) == 0 |
|
1228
|
0 |
0 |
unless $class->_is_zero($xc) |
|
1230
|
0 |
0 |
unless $class->_is_zero($yc) |
|
1239
|
0 |
0 |
if $class->_acmp($x, $y) == 0 |
|
1262
|
0 |
0 |
unless $class->_is_zero($xc) |
|
1264
|
0 |
0 |
unless $class->_is_zero($yc) |
|
1273
|
0 |
33 |
if $class->_is_zero($x) or $class->_is_zero($y) |
|
1276
|
16 |
17 |
$sx eq '-' && $sy eq '-' ? : |
|
1280
|
24 |
9 |
if ($sx eq '-') { } |
|
1295
|
25 |
8 |
if ($sy eq '-') { } |
|
1315
|
24 |
9 |
if $sx eq "-" |
|
1316
|
25 |
8 |
if $sy eq "-" |
|
1318
|
9 |
24 |
if ($diff > 0) { } |
|
|
0 |
24 |
elsif ($diff < 0) { } |
|
1335
|
16 |
17 |
if ($sign eq '-') { } |
|
1347
|
16 |
17 |
if $sign eq "-" |
|
1350
|
4 |
29 |
if $class->_is_zero($bx) |
|
1358
|
0 |
40 |
if $class->_is_zero($x) and $class->_is_zero($y) |
|
1361
|
24 |
16 |
$sx ne $sy ? : |
|
1365
|
27 |
13 |
if ($sx eq '-') { } |
|
1380
|
29 |
11 |
if ($sy eq '-') { } |
|
1400
|
27 |
13 |
if $sx eq "-" |
|
1401
|
29 |
11 |
if $sy eq "-" |
|
1403
|
9 |
31 |
if ($diff > 0) { } |
|
|
3 |
28 |
elsif ($diff < 0) { } |
|
1420
|
24 |
16 |
if ($sign eq '-') { } |
|
1432
|
24 |
16 |
if $sign eq "-" |
|
1435
|
8 |
32 |
if $class->_is_zero($bx) |
|
1443
|
0 |
35 |
if $class->_is_zero($x) and $class->_is_zero($y) |
|
1446
|
35 |
0 |
$sx eq '-' || $sy eq '-' ? : |
|
1450
|
23 |
12 |
if ($sx eq '-') { } |
|
1465
|
24 |
11 |
if ($sy eq '-') { } |
|
1485
|
23 |
12 |
if $sx eq "-" |
|
1486
|
24 |
11 |
if $sy eq "-" |
|
1488
|
12 |
23 |
if ($diff > 0) { } |
|
|
3 |
20 |
elsif ($diff < 0) { } |
|
1505
|
35 |
0 |
if ($sign eq '-') { } |
|
1517
|
35 |
0 |
if $sign eq "-" |
|
1520
|
0 |
35 |
if $class->_is_zero($bx) |
|
1536
|
318 |
51 |
unless ($class->_is_zero($tmp)) |
|
1539
|
318 |
51 |
length $str ? : |
|
1553
|
40 |
8 |
unless ($class->_is_zero($tmp)) |
|
1556
|
40 |
8 |
length $str ? : |
|
1570
|
32 |
8 |
unless ($class->_is_zero($tmp)) |
|
1573
|
32 |
8 |
length $str ? : |
|
1606
|
0 |
0 |
length $str ? : |
|
1616
|
0 |
0 |
unless ref $base |
|
1619
|
0 |
0 |
if (@_) { } |
|
1621
|
0 |
0 |
unless defined $collseq and length $collseq |
|
1624
|
0 |
0 |
if ($class->_acmp($base, $class->_new('94')) <= 0) { } |
|
1645
|
0 |
0 |
if $num > $#collseq |
|
1650
|
0 |
0 |
unless length $str |
|
1659
|
0 |
0 |
unless ref $base |
|
1661
|
0 |
0 |
unless $class->_acmp($base, $two) >= 0 |
|
1674
|
0 |
0 |
unless ($class->_is_zero($xcopy)) |
|
1679
|
0 |
0 |
unless @$out |
|
1700
|
0 |
0 |
if $rem == $len |
|
1729
|
0 |
0 |
if $rem == $len |
|
1758
|
0 |
0 |
if $rem == $len |
|
1791
|
0 |
0 |
unless ref $base |
|
1797
|
0 |
0 |
if (@_) { } |
|
1800
|
0 |
0 |
if ($class->_acmp($base, $class->_new('36')) <= 0) { } |
|
|
0 |
0 |
elsif ($class->_acmp($base, $class->_new('94')) <= 0) { } |
|
1825
|
0 |
0 |
if exists $collseq{$chr} |
|
1832
|
0 |
0 |
unless exists $collseq{$chr} |
|
1846
|
0 |
0 |
unless ref $base |
|
1848
|
0 |
0 |
unless $class->_acmp($base, $two) >= 0 |
|
1854
|
0 |
0 |
unless ref $ele |
|
1860
|
0 |
0 |
unless ref $ele |
|
1875
|
0 |
0 |
if ($class->_is_zero($y)) |
|
1880
|
0 |
0 |
if ($class->_is_one($y)) |
|
1895
|
0 |
0 |
if $class->_is_zero($b) |
|
1906
|
0 |
0 |
unless $class->_is_one($a) |
|
1908
|
0 |
0 |
$sign == 1 ? : |
|
1916
|
0 |
0 |
if ($class->_is_one($mod)) |
|
1922
|
0 |
0 |
if ($class->_is_zero($num)) |
|
1923
|
0 |
0 |
$class->_is_zero($exp) ? : |
|
1939
|
0 |
0 |
if (substr($expbin, $len, 1) eq 1) |
|
1957
|
0 |
0 |
if ($class->_acmp($x, $y) == 0) |
|
1961
|
0 |
0 |
if ($class->_is_zero($x)) { } |
|
1962
|
0 |
0 |
if ($class->_is_zero($y)) { } |
|
1968
|
0 |
0 |
if ($class->_is_zero($y)) { } |
|
2000
|
0 |
14 |
if $class->_is_zero($x) or $class->_is_zero($y) |
|
2013
|
0 |
0 |
if ref $n |
|
2017
|
0 |
0 |
if (wantarray) |
|
2021
|
0 |
0 |
if $n == 0 |
|
2024
|
0 |
0 |
if $n == 1 |
|
2038
|
0 |
0 |
if $n == 0 |
|
2047
|
0 |
0 |
if ref $n |
|
2051
|
0 |
0 |
if (wantarray) |
|
2055
|
0 |
0 |
if $n == 0 |
|
2058
|
0 |
0 |
if $n == 1 |
|
2076
|
0 |
0 |
if $n <= 0 |
|
2077
|
0 |
0 |
if $n <= 2 |
|
2078
|
0 |
0 |
if exists $cache->{$n} |
|
2085
|
0 |
0 |
if ($n % 2 == 1) { } |