| line |
true |
false |
branch |
|
46
|
29 |
2 |
if defined $typemap{$type} |
|
47
|
2 |
0 |
if $type =~ /\*$/ |
|
58
|
1 |
26 |
if (@{$func->{'arg_types'};} == 2 and $func->{'arg_types'}[0] eq 'int' and $func->{'arg_types'}[1] =~ /^(const |)char \*\*$/) { } |
|
81
|
6 |
4 |
if (defined $rest[0] and defined $rest[1] and $rest[0] eq 'options') |
|
84
|
6 |
0 |
if ($] >= 5.01) { } |
|
95
|
6 |
4 |
unless @rest > 0 |
|
110
|
5 |
2 |
if ($h->{'FFI::TinyCC::Inline/options'}) |
|
131
|
5 |
3 |
if ($h->{'FFI::TinyCC::Inline/options'}) |
|
137
|
0 |
7 |
unless defined $func |
|
238
|
0 |
27 |
if $args =~ /^\s+$/ |
|
247
|
0 |
27 |
if exists $results->{'functions'}{$function} |
|
256
|
0 |
6 |
if ($argno++ == 0 and $arg =~ s/^\s*pTHX_?\s*//) |
|
258
|
0 |
0 |
unless $arg =~ /\S/ |
|
265
|
6 |
0 |
if (my($type, $identifier) = $arg =~ /^\s*$re_type(?:$re_identifier)?\s*$/o) { } |
|
|
0 |
0 |
elsif ($arg =~ /^\s*\.\.\.\s*$/) { } |
|
271
|
0 |
6 |
if (not defined $arg_name and $arg_no_space ne 'void') |
|
272
|
0 |
0 |
unless $is_decl |
|
281
|
6 |
0 |
defined $arg_name ? : |
|
283
|
6 |
0 |
if ($arg_name) { } |
|
300
|
0 |
27 |
if $need_threading_context |