Branch Coverage

blib/lib/FFI/TinyCC/Inline.pm
Criterion Covered Total %
branch 23 40 57.5


line true false branch
47 29 2 if defined $typemap{$type}
48 2 0 if $type =~ /\*$/
59 1 26 if (@{$func->{'arg_types'};} == 2 and $func->{'arg_types'}[0] eq 'int' and $func->{'arg_types'}[1] =~ /^(const |)char \*\*$/) { }
82 6 4 if (defined $rest[0] and defined $rest[1] and $rest[0] eq 'options')
85 6 0 if ($] >= 5.01) { }
96 6 4 unless @rest > 0
111 5 2 if ($h->{'FFI::TinyCC::Inline/options'})
132 5 3 if ($h->{'FFI::TinyCC::Inline/options'})
138 0 7 unless defined $func
239 0 27 if $args =~ /^\s+$/
248 0 27 if exists $results->{'functions'}{$function}
257 0 6 if ($argno++ == 0 and $arg =~ s/^\s*pTHX_?\s*//)
259 0 0 unless $arg =~ /\S/
266 6 0 if (my($type, $identifier) = $arg =~ /^\s*$re_type(?:$re_identifier)?\s*$/o) { }
0 0 elsif ($arg =~ /^\s*\.\.\.\s*$/) { }
272 0 6 if (not defined $arg_name and $arg_no_space ne 'void')
273 0 0 unless $is_decl
282 6 0 defined $arg_name ? :
284 6 0 if ($arg_name) { }
301 0 27 if $need_threading_context