Branch Coverage

support/Test/Harness.pm
Criterion Covered Total %
branch 44 142 31.0


line true false branch
217 0 1 if (not $ok)
231 2 0 $$tot{'bad'} == 0 && ($$tot{'max'} || $$tot{'skipped'}) ? :
318 0 1 if defined $Files_In_Dir
332 0 58 if ($Debug)
335 0 58 $Timer ? :
337 0 58 unless (my(%results) = $Strap->analyze_file($tfile))
339 0 58 if ($Timer) { }
341 0 0 if ($has_time_hires) { }
345 0 0 $elapsed ? :
355 50334 0 if $results{'details'}[$_ - 1]{'actual_ok'}
381 58 0 if ($results{'passing'}) { }
383 6 52 if ($test{'max'} and $test{'skipped'} + $test{'bonus'}) { }
52 0 elsif ($test{'max'}) { }
0 0 elsif (defined $test{'skip_all'} and length $test{'skip_all'}) { }
385 6 0 if $test{'skipped'}
387 0 6 if ($test{'bonus'})
418 0 0 if ($test{'next'} <= $test{'max'}) { }
425 0 0 unless ref $$details[$overrun - 1]
430 0 0 if ($wstatus) { }
0 0 elsif ($results{'seen'}) { }
436 0 0 if (@{$test{'failed'};} and $test{'max'}) { }
474 0 58 if (defined $Files_In_Dir)
476 0 0 if (@new_dir_files != @dir_files)
519 0 58 if ($^O eq 'VMS')
525 58 0 if (-t STDOUT and not $ENV{'HARNESS_NOTTY'} and not $Verbose)
545 58 0 /\.(\w+)$/ ? :
548 6 52 if $len > $maxlen
549 1 57 if $suflen > $maxsuflen
564 1 0 if (_all_ok($tot)) { }
0 0 elsif (not $$tot{'tests'}) { }
0 0 elsif (not $$tot{'max'}) { }
566 0 1 if ($$tot{'bonus'})
570 0 0 unless $todo_passed
580 0 0 $$tot{'tests'} == 1 ? :
597 0 0 if ($$tot{'bad'})
599 0 0 if $bonusmsg
628 0 87284 if $Verbose
631 50392 36892 if $meth
638 0 58 if $$self{'_seen_header'}
642 0 58 if $$totals{'seen'} and $$totals{'max'} < $$totals{'seen'}
655 50334 0 if ($$detail{'ok'}) { }
658 556 49778 if ($$detail{'type'} eq 'skip')
659 6 550 unless defined $$totals{'skip_reason'}
661 0 556 if $$totals{'skip_reason'} ne $$detail{'reason'}
669 0 50334 if ($curr > $next) { }
0 50334 elsif ($curr < $next) { }
682 0 0 $$self{'bailout_reason'} ? :
688 366 0 if $ML
695 366 49968 if ($Last_ML_Print != $now)
705 0 0 $$tot{'bonus'} > 1 ? :
0 1 if $$tot{'bonus'}
709 0 1 if ($$tot{'skipped'}) { }
1 0 elsif ($$tot{'sub_skipped'}) { }
710 0 0 $$tot{'skipped'} != 1 ? :
712 0 0 if ($$tot{'sub_skipped'})
713 0 0 $$tot{'sub_skipped'} != 1 ? :
719 1 0 $$tot{'sub_skipped'} != 1 ? :
736 0 0 if $^O eq 'VMS'
740 0 0 if ($$test{'max'})
741 0 0 if ($$test{'next'} == $$test{'max'} + 1 and not @{$$test{'failed'};}) { }
766 0 0 $short eq 'Pass' ? :
774 0 0 if $namelen > $max_namelen
778 0 0 if ($list_len < length $list_str)
781 0 0 if ($max_namelen < length $failed_str)
816 0 0 if (@detail) { }
818 0 0 if ($_ > $last + 1 or $_ == $last)
819 0 0 $min == $last ? :
833 0 0 if $type =~ /todo/i
836 0 0 if ($max) { }
843 0 0 if ($skipped)
846 0 0 if ($max) { }