| line |
true |
false |
branch |
|
98
|
0 |
14 |
if $self->{'done'} |
|
101
|
1 |
13 |
if defined $self->{'plan_tests'} |
|
103
|
1 |
12 |
if $self->{'count'} > 0 |
|
105
|
10 |
2 |
if ($todo eq 'tests') { } |
|
|
1 |
1 |
elsif ($todo eq 'skip_all') { } |
|
106
|
1 |
9 |
unless @args == 1 and defined $args[0] and $args[0] =~ /^\d+$/ |
|
110
|
0 |
1 |
unless @args == 1 and defined $args[0] and length $args[0] |
|
137
|
1 |
282 |
if $self->{'done'} |
|
140
|
186 |
96 |
if defined $msg |
|
145
|
173 |
109 |
unless $cond |
|
206
|
8 |
127 |
if ($exception) { } |
|
|
4 |
123 |
elsif ($self->{'done'}) { } |
|
212
|
1 |
3 |
if defined $exception |
|
219
|
8 |
123 |
if ($self->{'has_error'}) |
|
223
|
9 |
122 |
if (defined $self->{'plan_tests'}) |
|
225
|
3 |
6 |
if ($self->{'count'} != $self->{'plan_tests'}) |
|
233
|
63 |
68 |
if ($self->{'fail_count'}) |
|
270
|
1 |
2 |
unless ref $hash eq 'HASH' |
|
333
|
0 |
32 |
if $self->{'done'} |
|
334
|
1 |
31 |
if not $msg or ref $msg |
|
339
|
4 |
27 |
if (&blessed($sub) and $sub->isa('Assert::Refute::Contract')) { } |
|
|
4 |
23 |
elsif (&blessed($sub) and $sub->isa('Assert::Refute::Report')) { } |
|
|
22 |
1 |
elsif (UNIVERSAL::isa($sub, 'CODE')) { } |
|
342
|
1 |
3 |
if @args |
|
344
|
1 |
2 |
unless $sub->is_done |
|
355
|
1 |
21 |
unless (eval {
do {
local $Assert::Refute::DRIVER = $rep;
&$sub($rep, @args);
$rep->done_testing(0);
1
}
}) |
|
365
|
1 |
27 |
if $rethrow |
|
437
|
0 |
1 |
unless $self->{'fail'} |
|
452
|
1 |
2 |
if exists $self->{'fail'}{$n} |
|
454
|
1 |
1 |
if $n =~ /^[1-9]\d*$/ and $n <= $self->{'count'} |
|
497
|
0 |
39 |
unless defined $n and $n =~ /^(?:[0-9]+|-1)$/ |
|
502
|
9 |
30 |
if (my $array = $self->{'messages'}{$n}) |
|
508
|
33 |
6 |
if ($n >= 1) { } |
|
513
|
4 |
29 |
if (ref $reason eq 'ARRAY') { } |
|
|
5 |
42 |
elsif ($reason and $reason ne 1) { } |
|
586
|
0 |
350 |
if $level > $verbosity |
|
591
|
293 |
57 |
exists $padding{$level} ? : |
|
605
|
1 |
56 |
if $level > 0 |
|
606
|
19 |
37 |
if $level == -1 |
|
648
|
68 |
99 |
if ($self->{'fail'}{$_}) { } |
|
649
|
33 |
35 |
if $streak |
|
656
|
25 |
32 |
if $streak |
|
658
|
45 |
7 |
$self->{'done'} ? : |
|
|
5 |
52 |
$self->get_error ? : |
|
716
|
2 |
89 |
if $self->{'done'} |
|
737
|
0 |
69 |
unless defined $verbosity |
|
742
|
8 |
61 |
if (defined $self->{'plan_tests'}) |
|
744
|
8 |
0 |
unless $verbosity < 0 |
|
751
|
152 |
138 |
if ($n > 0) |
|
753
|
75 |
77 |
$reason ? : |
|
754
|
74 |
78 |
$self->{'name'}{$n} ? : |
|
757
|
4 |
148 |
if ($self->{'subcontract'}{$n}) |
|
763
|
7 |
145 |
if (ref $reason eq 'ARRAY') { } |
|
|
52 |
170 |
elsif ($reason and $reason ne 1) { } |
|
773
|
76 |
214 |
if (my $rest = $self->{'messages'}{$n}) |
|
778
|
56 |
5 |
if (not defined $self->{'plan_tests'} and $self->{'done'}) |
|
779
|
56 |
0 |
unless $verbosity < 0 |
|
790
|
1 |
63 |
if defined $skip |
|
819
|
23 |
2 |
if (&blessed($parent)) { } |
|
|
1 |
1 |
elsif (not defined $parent) { } |