line |
true |
false |
branch |
236
|
66 |
24 |
if (not $lexer->eoi) { } |
252
|
0 |
208 |
if $#{$ast;} ne $#{$args;} |
257
|
52 |
12 |
if (substr($sym, 0, 1) eq q['] or substr($sym, 0, 1) eq '"') { } |
259
|
2 |
50 |
$sym eq $quote . $val . $quote ? : |
261
|
2 |
10 |
$sym == $val ? : |
267
|
104 |
12 |
substr($sym, 0, 1) ne '_' ? : |
272
|
20 |
8 |
if ($#{$l;} >= 0 and $#{$val;} >= 0) { } |
|
4 |
4 |
elsif ($#{$l;} < 0 and $#{$val;} < 0) { } |
285
|
0 |
12 |
unless defined $$val{'type'} and defined $$val{'val'} |
287
|
0 |
12 |
if $$adt[0] ne $$val{'type'} |
288
|
2 |
10 |
if $#{$$adt[1];} != $#{$$val{'val'};} |
295
|
154 |
66 |
if ($status) { } |
312
|
24 |
134 |
unless defined $compiled_patterns{$pattern_sig} |
315
|
92 |
66 |
if ($status) |