Branch Coverage

/home/pjcj/g/Test-Smoke/perl-current-gcov/regen/embed_lib.pl
Criterion Covered Total %
branch 42 50 84.0


line true false branch
31 456 48 if ($funcs)
32 114 342 if (not defined $wanted) { }
36 2697 2199 if ($$_[0] =~ /A/) { }
393 1806 elsif ($$_[0] =~ /E/) { }
37 899 1798 if $wanted eq 'A'
39 131 262 if $wanted eq 'E'
41 602 1204 if $wanted eq ''
49 258 242 if @conditional
58 0 1 unless open IN, $prefix . 'embed.fnc'
64 303 1980 if /^:/
65 81 1899 if /^$/
72 311 1588 if (/^\s*(#|$)/) { }
78 0 1899 if (@args == 1 and not $args[0] =~ /^#\s*(?:if|ifdef|ifndef|else|endif)/)
84 0 1 unless close IN
86 0 1 unless open IN, $prefix . 'regen/opcodes'
92 107 446 unless $_
93 69 377 if /^#/
95 333 44 if $syms{$check}++
101 0 1 unless close IN
113 1632 311 if (@$_ > 1)
121 151 160 if ($$_[0] =~ /^#if\s*(.*)/) { }
9 151 elsif ($$_[0] =~ /^#else\s*$/) { }
151 0 elsif ($$_[0] =~ m[^#endif\s*(?:/\*.*\*/)?$]) { }
124 0 9 unless @state
127 0 151 unless @state