| line |
true |
false |
branch |
|
130
|
0 |
4 |
unless defined $opts{$param} |
|
138
|
2 |
12 |
if $node->is_root |
|
143
|
2 |
10 |
if ($opts{'uid'} == $uid) |
|
161
|
3089 |
11752 |
if ($event_name =~ /^close_(?:bracket|parenthesis)$/) |
|
168
|
3308 |
11533 |
if ($event_name =~ /^open_(?:bracket|parenthesis)$/ or $event_name =~ /_prefix$/) |
|
186
|
872 |
7510 |
if $node->is_root |
|
202
|
0 |
2 |
unless defined $target |
|
209
|
2 |
24 |
if $node->is_root |
|
213
|
3 |
21 |
if (index($meta->{'text'}, $target) >= 0) |
|
230
|
0 |
7 |
if (not defined $wanted_uid or $wanted_uid < 1 or $wanted_uid > $self->uid) |
|
241
|
7 |
42 |
if $node->is_root |
|
246
|
7 |
35 |
if ($wanted_uid == $uid) |
|
278
|
1525 |
0 |
if defined $opts{'re'} |
|
279
|
0 |
1525 |
if defined $opts{'verbose'} |
|
299
|
874 |
10 |
if (defined(my $value = $self->_process)) { } |
|
301
|
0 |
874 |
if $self->verbose > 1 |
|
309
|
0 |
10 |
if $self->verbose |
|
333
|
0 |
4 |
unless defined $opts{$param} |
|
341
|
2 |
12 |
if $node->is_root |
|
346
|
2 |
10 |
if ($opts{'uid'} == $uid) |
|
364
|
0 |
1525 |
if $self->verbose |
|
368
|
0 |
1525 |
if ($string_re eq '') |
|
370
|
0 |
0 |
if $self->verbose |
|
375
|
0 |
1525 |
if $self->verbose |
|
377
|
0 |
1525 |
if ($self->verbose > 1) |
|
409
|
10 |
14833 |
if $event_name eq q['exhausted] |
|
414
|
0 |
14833 |
unless defined $pos |
|
421
|
551 |
874 |
if (my $status = $self->recce->ambiguous) { } |
|
|
860 |
14 |
elsif ($self->recce->exhausted) { } |
|
424
|
533 |
18 |
if $#$terminals < 0 |
|
431
|
8 |
852 |
if ($pos + 1 == $length and substr($string_re, $pos, 1) eq ')') |
|
439
|
0 |
860 |
if $self->verbose > 1 |
|
442
|
551 |
874 |
if ($message) |
|
446
|
0 |
551 |
if $self->verbose |
|
449
|
0 |
1425 |
if $self->verbose |
|
471
|
0 |
0 |
if $node->is_root |
|
510
|
0 |
2 |
unless defined $target |
|
519
|
2 |
36 |
if $node->is_root |
|
523
|
4 |
32 |
if ($meta->{'text'} =~ /$re/) |
|
541
|
0 |
2 |
unless defined $opts{$param} |
|
549
|
1 |
6 |
if $node->is_root |
|
554
|
1 |
5 |
if ($opts{'uid'} == $uid) |
|
572
|
1525 |
2 |
&does($raw_re, 'Regexp') ? : |
|
578
|
0 |
0 |
if $self->verbose |
|
598
|
0 |
0 |
'x' =~ /$re/ ? : |
|
623
|
184 |
14659 |
if ($event_count > 1) |
|
627
|
121 |
63 |
if ($event_list eq 'caret, string') { } |
|
|
23 |
40 |
elsif ($event_list eq 'query, string') { } |
|
|
40 |
0 |
elsif ($event_list eq 'string, vertical_bar') { } |
|
662
|
10 |
14833 |
if ($event_name eq q['exhausted]) |
|
674
|
0 |
14833 |
if ($self->verbose > 1) |