Branch Coverage

blib/lib/Test/Smoke/Smoker.pm

Criterion	Covered	Total	%
branch	69	316	21.8

line	true	false	branch
146	0	20	unless (ref $fh eq "GLOB")
151	0	20	UNIVERSAL::isa($_[0], 'HASH') ? :
	20	0	@_ ? :
159	28	392	exists $args{$_} ? :
165	0	20	if $fields{'is56x'}
166	0	20	if $^O =~ /VMS/i
168	18	2	unless (defined $fields{'testmake'})
170	0	18	if $fields{'is_win32'}
171	0	18	if $fields{'is_vms'}
223	21	17	if ($key eq "all_defaults")
231	0	17	unless exists $CONFIG{"df_$key"}
233	0	17	if @_
284	0	0	if $self->{'is_vms'}
288	0	0	if $self->{'v'} > 1
300	0	0	if $cinfo{'cc'}
303	0	0	unless ($c_result)
309	0	0	unless exists $sconf{'ldlibpthname'}
312	0	0	if $sconf{'ldlibpthname'}
317	0	0	if ($build_stat == -1)
323	0	0	if ($build_stat == 0)
328	0	0	unless ($self->make_test_prep)
349	0	0	if ($self->{'fdir'} and -d $self->{'fdir'}) { }
359	0	0	$self->{'is_vms'} ? :
374	0	0	unless $self->{'v'} > 1
381	0	0	if ($mani_check->{$file} == ST_MISSING()) { }
	0	0	elsif ($mani_check->{$file} == ST_UNDECLARED()) { }
400	0	0	unless UNIVERSAL::isa($policy, "Test::Smoke::Policy")
404	0	0	if (@substs)
424	0	0	if ($self->{'is_win32'}) { }
	0	0	elsif ($self->{'is_vms'}) { }
427	0	0	"$config" =~ /-DCCTYPE=/ ? :
458	0	0	if $self->{'is_vms'} and $config->has_arg("-Dusevmsdebug")
461	0	0	if $self->{'is_win32'} and $config->has_arg("-Uuseshrplib")
466	0	0	if ($self->{'is_win32'})
472	0	0	if $cinfo{'cc'}
474	0	0	if $self->{'w32cc'} =~ /MSVC|BORLAND|GCC/
481	0	0	if $self->{'is_vms'} and $config->has_arg("-Dusevmsdebug")
483	0	0	if $self->{'is_win32'} and $config->has_arg("-Uuseshrplib")
488	0	0	unless -x $miniperl
490	0	0	$self->{'_run_exit'} ? :
	0	0	-x $perl ? :
502	0	0	if $self->{'harnessonly'}
506	0	0	if $self->{'run'}
509	0	0	$self->{'is_win32'} ? :
529	0	0	$config_args =~ /-Uuseperlio\b/ || $self->{'defaultenv'} ? :
532	0	0	if (not $config_args =~ /-Uuseperlio\b/ || $self->{'defaultenv'} and $self->{'locale'})
542	0	0	defined $ENV{'LC_ALL'} ? :
544	0	0	if ($perlio ne 'locale') { }
546	0	0	if $self->{'is_win32'}
547	0	0	if $self->{'force_c_locale'}
548	0	0	unless $ENV{'LC_ALL'}
550	0	0	if $self->{'defaultenv'}
557	0	0	unless ($self->{'run'})
562	0	0	if ($self->{'harnessonly'}) { }
566	0	0	if $self->{'harness3opts'}
572	0	0	$self->{'is56x'} ? :
	0	0	$self->{'is_vms'} ? :
575	0	0	if ($self->{'is_win32'}) { }
585	0	0	if not $had_LC_ALL and exists $ENV{'LC_ALL'}
603	0	0	if (@harness)
613	0	0	if $self->{'is_vms'}
617	0	0	if chdir "t"
620	0	0	$self->{'v'} > 1 ? :
628	0	0	if ($all_ok) { }
632	0	0	$harness_out ? :
	0	0	scalar keys %inconsistent ? :
640	0	0	scalar keys %inconsistent ? :
646	0	0	if $changed_dir
663	0	0	if ($self->{'is_vms'}) { }
	0	0	elsif ($self->{'is_win32'}) { }
665	0	0	$config->has_arg('-Dusevmsdebug') ? :
670	0	0	$config->has_arg('-Uuseshrplib') ? :
673	0	0	if ($self->{'hasharness3'}) { }
707	0	0	if $line =~ / \b (?:Files | u) = .+ Tests = [0-9]+ /xi
710	0	0	if $last
711	0	0	if $line =~ /All tests successful/
714	0	0	if $line =~ /Failed Test\s+Stat/
716	0	0	unless $seenheader
719	0	0	if ($name) { }
725	0	0	unless $fail
731	0	0	unless (close $tst)
768	0	0	if $line =~ / \b (?:Files | u) = .+ Tests = [0-9]+ /xi
771	0	0	if $line =~ /All tests successful/
774	0	0	if $line =~ /Test Summary Report/
775	0	0	unless $seenheader
778	0	0	if ($tname)
779	0	0	if ($file and not $found)
791	0	0	if ($failed)
800	0	0	if ($todo)
809	0	0	if ($extra)
815	0	0	if ($parse_error)
824	0	0	if ($exit_status)
832	0	0	if ($file and not $found)
839	0	0	unless (close $tst)
851	0	0	unless ($target)
862	0	0	if skip_filter($_)
867	0	0	if (/^u=.*tests=/) { }
876	0	0	unless (close $tst)
882	0	0	if (grep /^All tests successful/, @nok) { }
	0	0	elsif (not $extend) { }
886	0	0	if $self->{'patch'}
906	0	0	if ($self->{'is_win32'}) { }
926	12	5	if grep /^Test Summary Report/, @lines
934	10	6	if ($name) { }
943	0	28	if /All tests successful/
980	22	108	if ($tname) { }
	9	99	elsif ($failed) { }
	14	85	elsif ($todo) { }
	23	62	elsif ($extra) { }
	7	55	elsif ($parse_error) { }
	6	49	elsif ($exit_status) { }
982	0	22	if ($file and not $found)
1012	178	118	unless $seenheader
1013	2	294	if /All tests successful/
1015	130	166	$seenheader ? :
1017	1	11	if ($file and not $found)
1039	0	4	unless $nok =~ m(^((?:\.\.[\\/])?\w+[\\/][-\w/\\]+)\.*(.*))
1059	6	24	unless $test_name =~ /\.t$/
1060	28	2	unless ($test_name =~ m[^\.\.\/])
1061	5	23	$test_name =~ /^(?:cpan|dist|ext|lib|t)\b/ ? :
1070	0	30	if $self->{'is_win32'}
1073	0	30	unless $test_path =~ m[^\.\.[\\/]]
1093	0	2	unless $self->{'skip_tests'}
1096	2	0	if (open SKIPTESTS, "< $self->{'skip_tests'}") { }
1097	1	1	$unset ? :
1102	0	10	if $raw =~ /^\s*#/
1104	0	0	unless ($raw =~ /\.t$/ or $raw =~ /test\.pl$/)
1107	8	2	if ($raw =~ m[^(?:lib|ext|cpan|dist)/])
1112	0	2	unless -f $tsrc
1121	1	1	!$unset ? :
1127	2	0	if @libext
1145	1	1	if ($unset) { }
1146	1	0	if (-f $mani_new)
1156	0	1	unless (rename $mani_org, $mani_new)
1163	1	0	if (open MANIO, "< $mani_new")
1165	1	0	if (open MANIN, "> $mani_org")
1171	13	4	if (not grep(/\Q$fn\E/, @$tests)) { }
1198	0	0	if defined $sub
1202	0	0	if $err
1204	0	0	wantarray ? :
1217	0	0	if $self->{'makeopt'}
1218	0	0	if $cmd =~ /clean/
1222	0	0	$self->{'is_win32'} ? :
	0	0	$self->{'is_vms'} ? :
1233	0	0	unless chdir "win32"
1235	0	0	unless chdir ".."
1236	0	0	wantarray ? :
1247	0	0	if $cmd =~ s[2\s*>\s*/dev/null\s*$][]
1250	0	0	$kill_err ? :
1253	0	0	wantarray ? :
1266	0	0	unless defined $extra
1272	0	0	if ($self->{'is_win32'}) { }
1273	0	0	unless chdir "win32"
1276	0	0	unless $ok = open(TST, $cmd)
1277	0	0	unless chdir ".."
1281	0	0	unless $ok = open(TST, $cmd)
1283	0	0	unless ($ok)
1301	0	0	unless $^O eq "VMS"