| line |
true |
false |
branch |
|
415
|
1 |
304 |
unless $arg_for |
|
439
|
1 |
303 |
if (1 < grep({defined $_;} $iterator, $tap, $raw_source, $exec)) |
|
445
|
0 |
303 |
if (my(@excess) = sort(keys %args)) |
|
452
|
60 |
243 |
if ($tap) { } |
|
|
11 |
232 |
elsif ($exec) { } |
|
|
220 |
12 |
elsif ($raw_source) { } |
|
|
11 |
1 |
elsif ($iterator) { } |
|
462
|
6 |
214 |
ref $raw_source ? : |
|
468
|
291 |
12 |
if ($source->raw) |
|
475
|
1 |
301 |
unless ($iterator) |
|
481
|
2408 |
903 |
'ARRAY' eq ref $v ? : |
|
484
|
0 |
301 |
if $version |
|
803
|
449 |
206 |
if ref $_[0]{'passed'} |
|
804
|
49 |
157 |
wantarray ? : |
|
834
|
138 |
156 |
if ref $_[0]{'actual_passed'} |
|
835
|
78 |
78 |
wantarray ? : |
|
933
|
344 |
313 |
unless @_ |
|
935
|
10 |
303 |
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 |
246 |
if ($plan->has_skip) |
|
1212
|
4 |
811 |
if (defined $number and delete $planned_todo{$number}) |
|
1219
|
709 |
152 |
if (defined(my $tests_planned = $self->tests_planned)) |
|
1220
|
50 |
659 |
if ($tests_run > $tests_planned) |
|
1225
|
815 |
46 |
if (defined $number) { } |
|
1226
|
82 |
733 |
if ($number != $tests_run) |
|
1236
|
57 |
804 |
if $has_todo |
|
1237
|
16 |
845 |
if $test->todo_passed |
|
1239
|
23 |
838 |
if $test->has_skip |
|
1242
|
752 |
109 |
$test->is_ok ? : |
|
1246
|
761 |
100 |
$test->is_actual_ok ? : |
|
1270
|
3 |
22 |
if ($ver_num <= $DEFAULT_TAP_VERSION) |
|
1277
|
1 |
24 |
if ($ver_num > $MAX_TAP_VERSION) |
|
1344
|
5838 |
9730 |
if (my $default = $state_defaults{$next}) |
|
1369
|
271 |
305 |
if @_ |
|
1395
|
1 |
1423 |
unless my $state_spec = $state_table->{$state} |
|
1398
|
1423 |
0 |
if (my $next = $state_spec->{$type}) { } |
|
1399
|
1305 |
118 |
if (my $act = $next->{'act'}) |
|
1402
|
114 |
1309 |
if (my $cont = $next->{'continue'}) { } |
|
|
1151 |
158 |
elsif (my $goto = $next->{'goto'}) { } |
|
1428
|
62 |
216 |
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 |
1238 |
if $@ |
|
1462
|
1032 |
207 |
if (defined $result) { } |
|
1466
|
18 |
1013 |
if $spool |
|
1493
|
269 |
0 |
if $] >= 5.006 |
|
1496
|
23 |
246 |
if (not $self->plan) { } |
|
1500
|
243 |
3 |
unless defined $self->is_good_plan |
|
1502
|
24 |
245 |
if ($self->tests_run != ($self->tests_planned || 0)) |
|
1504
|
18 |
6 |
if (defined(my $planned = $self->tests_planned)) |
|
1510
|
1 |
268 |
if ($self->tests_run != $self->passed + $self->failed) |
|
1520
|
17 |
251 |
unless defined $self->is_good_plan |
|
1522
|
211 |
57 |
unless ($self->parse_errors) |
|
1524
|
165 |
46 |
if ($self->tests_run == @{$self->{'passed'};}) |
|
1527
|
151 |
60 |
if ($self->tests_run == @{$self->{'actual_passed'};}) |