| line |
true |
false |
branch |
|
30
|
66 |
24 |
if (not $lexer->eoi) { } |
|
46
|
0 |
208 |
if $#{$ast;} ne $#{$args;} |
|
51
|
52 |
12 |
if (substr($sym, 0, 1) eq q['] or substr($sym, 0, 1) eq '"') { } |
|
53
|
2 |
50 |
$sym eq $quote . $val . $quote ? : |
|
55
|
2 |
10 |
$sym == $val ? : |
|
61
|
104 |
12 |
substr($sym, 0, 1) ne '_' ? : |
|
66
|
20 |
8 |
if ($#{$l;} >= 0 and $#{$val;} >= 0) { } |
|
|
4 |
4 |
elsif ($#{$l;} < 0 and $#{$val;} < 0) { } |
|
79
|
0 |
12 |
unless defined $$val{'type'} and defined $$val{'val'} |
|
81
|
0 |
12 |
if $$adt[0] ne $$val{'type'} |
|
82
|
2 |
10 |
if $#{$$adt[1];} != $#{$$val{'val'};} |
|
89
|
154 |
66 |
if ($status) { } |
|
106
|
24 |
134 |
unless defined $compiled_patterns{$pattern_sig} |
|
109
|
92 |
66 |
if ($status) |