lib/XS/TCC/Parser.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 22 | 50.0 |
line | true | false | branch |
---|---|---|---|
84 | 0 | 7 | if $args =~ /^\s+$/ |
93 | 0 | 7 | if exists $$results{'functions'}{$function} |
102 | 1 | 8 | if ($argno++ == 0 and $arg =~ s/^\s*pTHX_?\s*//) |
104 | 0 | 1 | unless $arg =~ /\S/ |
111 | 9 | 0 | if (my($type, $identifier) = $arg =~ /^\s*$re_type(?:$re_identifier)?\s*$/o) { } |
0 | 0 | elsif ($arg =~ /^\s*\.\.\.\s*$/) { } | |
117 | 0 | 9 | if (not defined $arg_name and $arg_no_space ne 'void') |
118 | 0 | 0 | unless $is_decl |
127 | 9 | 0 | defined $arg_name ? : |
129 | 9 | 0 | if ($arg_name) { } |
146 | 1 | 6 | if $need_threading_context |