line |
true |
false |
branch |
97
|
0 |
9 |
if $self->{'done'} |
100
|
0 |
9 |
if defined $self->{'plan_tests'} |
102
|
0 |
9 |
if $self->{'count'} > 0 |
104
|
8 |
1 |
if ($todo eq 'tests') { } |
|
1 |
0 |
elsif ($todo eq 'skip_all') { } |
105
|
0 |
8 |
unless @args == 1 and defined $args[0] and $args[0] =~ /^\d+$/ |
109
|
0 |
1 |
unless @args == 1 and defined $args[0] and length $args[0] |
136
|
1 |
412 |
if $self->{'done'} |
139
|
285 |
127 |
if defined $msg |
144
|
260 |
152 |
unless $cond |
205
|
11 |
185 |
if ($exception) { } |
|
4 |
181 |
elsif ($self->{'done'}) { } |
211
|
1 |
3 |
if defined $exception |
218
|
11 |
181 |
if ($self->{'has_error'}) |
222
|
9 |
183 |
if (defined $self->{'plan_tests'}) |
224
|
3 |
6 |
if ($self->{'count'} != $self->{'plan_tests'}) |
232
|
92 |
100 |
if ($self->{'fail_count'}) |
269
|
1 |
2 |
unless ref $hash eq 'HASH' |
322
|
0 |
48 |
if $self->{'done'} |
323
|
0 |
48 |
unless $msg |
327
|
8 |
40 |
if (&blessed($sub) and $sub->isa('Assert::Refute::Contract')) { } |
|
0 |
40 |
elsif (&blessed($sub) and $sub->isa('Assert::Refute::Report')) { } |
|
39 |
1 |
elsif (UNIVERSAL::isa($sub, 'CODE')) { } |
330
|
0 |
0 |
if @args |
332
|
0 |
0 |
unless $sub->is_done |
342
|
1 |
38 |
unless (eval {
do {
&$sub($rep, @args);
$rep->done_testing(0);
1
}
}) |
424
|
9 |
2 |
if exists $self->{'fail'}{$n} |
426
|
1 |
1 |
if $n =~ /^[1-9]\d*$/ and $n <= $self->{'count'} |
469
|
0 |
38 |
unless defined $n and $n =~ /^(?:[0-9]+|-1)$/ |
474
|
9 |
29 |
if (my $array = $self->{'messages'}{$n}) |
480
|
32 |
6 |
if ($n >= 1) { } |
485
|
4 |
28 |
if (ref $reason eq 'ARRAY') { } |
|
5 |
40 |
elsif ($reason and $reason ne 1) { } |
558
|
0 |
466 |
if $level > $verbosity |
563
|
388 |
78 |
exists $padding{$level} ? : |
577
|
1 |
77 |
if $level > 0 |
578
|
26 |
51 |
if $level == -1 |
620
|
93 |
131 |
if ($self->{'fail'}{$_}) { } |
621
|
41 |
52 |
if $streak |
628
|
41 |
48 |
if $streak |
630
|
76 |
5 |
$self->{'done'} ? : |
|
8 |
81 |
$self->get_error ? : |
669
|
3 |
55 |
unless (eval {
do {
&$code($self, @args);
$self->done_testing(0);
1
}
}) |
688
|
2 |
121 |
if $self->{'done'} |
709
|
0 |
94 |
unless defined $verbosity |
714
|
8 |
86 |
if (defined $self->{'plan_tests'}) |
716
|
8 |
0 |
unless $verbosity < 0 |
723
|
205 |
188 |
if ($n > 0) |
725
|
103 |
102 |
$reason ? : |
726
|
121 |
84 |
$self->{'name'}{$n} ? : |
729
|
16 |
189 |
if ($self->{'subcontract'}{$n}) |
735
|
7 |
198 |
if (ref $reason eq 'ARRAY') { } |
|
70 |
230 |
elsif ($reason and $reason ne 1) { } |
745
|
101 |
292 |
if (my $rest = $self->{'messages'}{$n}) |
750
|
81 |
5 |
if (not defined $self->{'plan_tests'} and $self->{'done'}) |
751
|
81 |
0 |
unless $verbosity < 0 |
762
|
1 |
88 |
if defined $skip |