line |
true |
false |
branch |
49
|
0 |
5345 |
unless defined $_ |
51
|
5345 |
0 |
if (s/^([+-]?)0*(\d+)$/$1$2/) { } |
52
|
0 |
5345 |
unless $1 |
80
|
0 |
0 |
unless $num eq '+0' |
99
|
0 |
246 |
if ($x eq 'NaN') { } |
|
0 |
246 |
elsif ($y eq 'NaN') { } |
111
|
22 |
737 |
if $cx eq $cy |
116
|
737 |
0 |
if ($sx eq '+') { } |
117
|
0 |
737 |
if $sy eq '-' or $cy eq '+0' |
119
|
343 |
394 |
if $ld |
122
|
0 |
0 |
if $sy eq '+' |
124
|
0 |
0 |
if $ld |
132
|
0 |
1046 |
if ($x eq 'NaN') { } |
|
0 |
1046 |
elsif ($y eq 'NaN') { } |
140
|
712 |
334 |
if ($sx eq $sy) { } |
144
|
93 |
241 |
if (&cmp($y, $x) > 0) { } |
160
|
0 |
0 |
if ($x eq 'NaN' or $y eq 'NaN') { } |
175
|
37 |
1307 |
unless @$y_array or $car |
176
|
1307 |
0 |
@$y_array ? : |
|
17 |
1290 |
($x += (@$y_array ? shift @$y_array : 0) + $car) >= 100000 ? : |
|
17 |
1290 |
if $car = ($x += (@$y_array ? shift @$y_array : 0) + $car) >= 100000 ? 1 : 0 |
179
|
211 |
16 |
unless $car |
180
|
0 |
16 |
($y += $car) >= 100000 ? : |
|
0 |
16 |
if $car = ($y += $car) >= 100000 ? 1 : 0 |
190
|
20 |
2748 |
unless @$sy_array or $bar |
191
|
2538 |
210 |
@$sy_array ? : |
|
638 |
2110 |
if $bar = ($sx -= (@$sy_array ? shift @$sy_array : 0) + $bar) < 0 |
199
|
0 |
395 |
if ($x eq 'NaN') { } |
|
0 |
395 |
elsif ($y eq 'NaN') { } |
214
|
1 |
394 |
shift @$x_array ne shift @$y_array ? : |
223
|
1271 |
427 |
if $car |
237
|
0 |
0 |
wantarray ? : |
|
0 |
179 |
if $x eq 'NaN' or $y eq 'NaN' or $y eq '+0' |
239
|
93 |
0 |
wantarray ? : |
|
93 |
86 |
if &cmp(&abs($x), &abs($y)) < 0 |
243
|
0 |
86 |
shift @x ne shift @y ? : |
245
|
86 |
0 |
if (($dd = int 100000 / ($y[$#y] + 1)) != 1) { } |
263
|
0 |
774 |
$u0 == $v1 ? : |
268
|
675 |
99 |
if ($q) |
273
|
651 |
24 |
if $bar = ($x[$x] -= $prd + $bar) < 0 |
275
|
0 |
675 |
if ($x[$#x] < $car + $bar) |
278
|
0 |
0 |
if $car = ($x[$x] += $y[$y] + $car) > 100000 |
285
|
86 |
0 |
if (wantarray) { } |
287
|
86 |
0 |
if ($dd != 1) { } |
307
|
0 |
0 |
if ($x eq 'NaN') { } |
|
0 |
0 |
elsif ($y eq 'NaN') { } |
|
0 |
0 |
elsif ($x eq '+1') { } |
|
0 |
0 |
elsif ($x eq '-1') { } |
|
0 |
0 |
elsif ($y =~ /^-/) { } |
|
0 |
0 |
elsif ($x eq '+0' and $y eq '+0') { } |
314
|
0 |
0 |
&bmod($x, 2) ? : |
326
|
0 |
0 |
if ($res ne '+0') |
327
|
0 |
0 |
if ($y ne '+0') |