| 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 |