| line |
true |
false |
branch |
|
415
|
1 |
306 |
unless $arg_for |
|
439
|
1 |
305 |
if (1 < grep({defined $_;} $iterator, $tap, $raw_source, $exec)) |
|
445
|
0 |
305 |
if (my(@excess) = sort(keys %args)) |
|
452
|
60 |
245 |
if ($tap) { } |
|
|
11 |
234 |
elsif ($exec) { } |
|
|
222 |
12 |
elsif ($raw_source) { } |
|
|
11 |
1 |
elsif ($iterator) { } |
|
462
|
6 |
216 |
ref $raw_source ? : |
|
468
|
293 |
12 |
if ($source->raw) |
|
475
|
1 |
303 |
unless ($iterator) |
|
481
|
2424 |
909 |
'ARRAY' eq ref $v ? : |
|
484
|
0 |
303 |
if $version |
|
803
|
451 |
210 |
if ref $_[0]{'passed'} |
|
804
|
51 |
159 |
wantarray ? : |
|
834
|
138 |
160 |
if ref $_[0]{'actual_passed'} |
|
835
|
80 |
80 |
wantarray ? : |
|
933
|
344 |
315 |
unless @_ |
|
935
|
10 |
305 |
if (my $state = shift()) { } |
|
953
|
0 |
0 |
unless +(shift())->{'pragma'} |
|
1171
|
2 |
29 |
if ($self->pragma('strict')) |
|
1181
|
4 |
0 |
if ($pr =~ /^ ([-+])(\w+) $/x) |
|
1196
|
8 |
248 |
if ($plan->has_skip) |
|
1212
|
4 |
821 |
if (defined $number and delete $planned_todo{$number}) |
|
1219
|
719 |
152 |
if (defined(my $tests_planned = $self->tests_planned)) |
|
1220
|
50 |
669 |
if ($tests_run > $tests_planned) |
|
1225
|
825 |
46 |
if (defined $number) { } |
|
1226
|
82 |
743 |
if ($number != $tests_run) |
|
1236
|
57 |
814 |
if $has_todo |
|
1237
|
16 |
855 |
if $test->todo_passed |
|
1239
|
23 |
848 |
if $test->has_skip |
|
1242
|
762 |
109 |
$test->is_ok ? : |
|
1246
|
771 |
100 |
$test->is_actual_ok ? : |
|
1270
|
3 |
24 |
if ($ver_num <= $DEFAULT_TAP_VERSION) |
|
1277
|
1 |
26 |
if ($ver_num > $MAX_TAP_VERSION) |
|
1344
|
5880 |
9800 |
if (my $default = $state_defaults{$next}) |
|
1369
|
273 |
309 |
if @_ |
|
1395
|
1 |
1437 |
unless my $state_spec = $state_table->{$state} |
|
1398
|
1437 |
0 |
if (my $next = $state_spec->{$type}) { } |
|
1399
|
1319 |
118 |
if (my $act = $next->{'act'}) |
|
1402
|
114 |
1323 |
if (my $cont = $next->{'continue'}) { } |
|
|
1165 |
158 |
elsif (my $goto = $next->{'goto'}) { } |
|
1428
|
62 |
218 |
if ($self->_has_callbacks) { } |
|
1431
|
1 |
339 |
if $@ |
|
1433
|
278 |
62 |
if (defined $result) { } |
|
1436
|
64 |
214 |
if (my $code = $self->_callback_for($result->type)) { } |
|
1446
|
12 |
266 |
if $spool |
|
1450
|
62 |
0 |
unless defined $result |
|
1460
|
1 |
1254 |
if $@ |
|
1462
|
1046 |
209 |
if (defined $result) { } |
|
1466
|
18 |
1027 |
if $spool |
|
1493
|
271 |
0 |
if $] >= 5.006 |
|
1496
|
23 |
248 |
if (not $self->plan) { } |
|
1500
|
245 |
3 |
unless defined $self->is_good_plan |
|
1502
|
24 |
247 |
if ($self->tests_run != ($self->tests_planned || 0)) |
|
1504
|
18 |
6 |
if (defined(my $planned = $self->tests_planned)) |
|
1510
|
1 |
270 |
if ($self->tests_run != $self->passed + $self->failed) |
|
1520
|
17 |
253 |
unless defined $self->is_good_plan |
|
1522
|
213 |
57 |
unless ($self->parse_errors) |
|
1524
|
167 |
46 |
if ($self->tests_run == @{$self->{'passed'};}) |
|
1527
|
153 |
60 |
if ($self->tests_run == @{$self->{'actual_passed'};}) |