Branch Coverage

blib/lib/Assert/Refute/Report.pm
Criterion Covered Total %
branch 96 114 84.2


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