Branch Coverage

blib/lib/Const/Introspect/C.pm
Criterion Covered Total %
branch 26 30 86.6


line true false branch
111 0 1 if ($ret != 0 or $sig != 0)
124 256 0 if ($line =~ /^#define\s+(\S+)\s+(.*)\s*$/u) { }
128 13 243 if $name =~ /[()]/u
129 236 7 unless $name =~ /$filter/u
131 3 4 if ($value =~ /^-?([1-9][0-9]*|0[0-7]*)$/u) { }
1 3 elsif ($value =~ /^"([a-z_0-9]+)"$/iu) { }
2 1 elsif ($value =~ /^([0-9]+\.[0-9]+)([Ff]{0,1})$/u) { }
153 1 1 $2 ? :
205 0 28 unless $tt->process(\$template, \%args, \$output)
219 28 0 $self->lang eq 'c' ? :
245 26 2 if $out eq ''
248 2 26 if $error
278 2 9 if $type eq 'string'
279 1 10 if $type eq 'pointer'
281 1 10 if $type eq 'pointer'