| line |
true |
false |
branch |
|
52
|
12 |
74 |
unless defined $start |
|
101
|
10 |
1194 |
if (my $value = $flat_args->{'trace_file_handle'}) |
|
118
|
0 |
1333 |
if ($current_event) |
|
127
|
725 |
608 |
unless ($handler) |
|
130
|
0 |
1333 |
unless ($handler) |
|
134
|
0 |
1333 |
if (ref $handler ne 'CODE') |
|
146
|
644 |
689 |
if ($retour eq 'ok') |
|
147
|
0 |
644 |
if ($event_type eq 'before lexeme') |
|
157
|
689 |
0 |
if $retour eq 'pause' |
|
188
|
25330 |
198631 |
if ($character =~ /$re/) |
|
190
|
18 |
25312 |
if ($trace_terminals >= 2) |
|
195
|
0 |
18 |
unless say {$trace_file_handle;} "Registering character $char_desc as symbol ${symbol_id}: ", $slg->l0_symbol_display_form($symbol_id) |
|
207
|
5053 |
355 |
if $is_graphic |
|
222
|
0 |
1193 |
unless $flat_args |
|
227
|
0 |
1193 |
unless defined $slg |
|
235
|
0 |
1193 |
if (ref $event_handlers ne 'HASH') |
|
247
|
0 |
1193 |
unless (&blessed($slg) and $slg->isa($slg_class)) |
|
249
|
0 |
0 |
$ref_type ? : |
|
329
|
0 |
1186 |
unless $lua |
|
346
|
0 |
11 |
unless $flat_args |
|
376
|
0 |
1198 |
if ($slr->[5]) |
|
395
|
0 |
549 |
if ($slr->[5]) |
|
428
|
0 |
2 |
if (not defined $input_ref or ref $input_ref ne 'SCALAR') |
|
433
|
0 |
2 |
if (grep {ref $_ ne 'HASH';} @more_args) |
|
441
|
0 |
2 |
if ($length_read != length $input_length) |
|
450
|
0 |
2 |
if ($ambiguity_level != 1) |
|
457
|
0 |
2 |
unless $value_ref |
|
622
|
0 |
62 |
unless defined $symbol_name |
|
632
|
62 |
0 |
if $ok |
|
639
|
0 |
116 |
if (&Scalar::Util::tainted($value)) |
|
647
|
0 |
116 |
unless defined $symbol_name |
|
652
|
116 |
0 |
if (defined $value) { } |
|
666
|
114 |
0 |
if $ok |
|
673
|
0 |
168 |
if ($slr->[5]) |
|
720
|
0 |
116 |
if ($slr->[5]) |
|
756
|
0 |
116 |
unless $ok |
|
764
|
0 |
243 |
if ($slr->[5]) |
|
773
|
0 |
243 |
if (&Scalar::Util::tainted($value)) |
|
806
|
0 |
243 |
unless $ok |
|
814
|
0 |
36 |
if ($slr->[5]) |
|
851
|
1 |
35 |
unless $ok |
|
936
|
1 |
1296 |
if &Scalar::Util::tainted(${$p_string;}) |
|
938
|
0 |
1296 |
if ((my $ref_type = ref $p_string) ne 'SCALAR') |
|
939
|
0 |
0 |
$ref_type ? : |
|
945
|
0 |
1296 |
unless (defined ${$p_string;}) |
|
997
|
0 |
1341 |
if ($slr->[5]) |
|
1150
|
0 |
8649 |
unless $slr |
|
1151
|
0 |
8649 |
unless $regix |
|
1165
|
2 |
8647 |
unless ($eval_ok) |
|
1195
|
6042 |
7057 |
unless ($cmd) |
|
1200
|
0 |
7057 |
unless $handler |
|
1204
|
0 |
7057 |
unless defined $handler_cmd |
|
1206
|
7057 |
0 |
if ($handler_cmd eq 'ok') |
|
1209
|
0 |
7057 |
if (scalar @resume_args < 1) |
|
1214
|
0 |
0 |
if ($handler_cmd eq 'sig') |
|
1225
|
9 |
6042 |
unless ($eval_ok) |
|
1227
|
0 |
9 |
if ref $eval_error |
|
1264
|
8 |
59 |
unless $set_desc |
|
1283
|
8 |
59 |
unless $set_data |
|
1293
|
59 |
490 |
unless defined $item_data |
|
1300
|
207 |
283 |
if ($dot_position < 0) { } |
|
1329
|
490 |
67 |
unless $token_link_data |
|
1344
|
67 |
0 |
if (defined $predecessor_ahm) |
|
1355
|
67 |
0 |
unless (defined $value) |
|
1373
|
0 |
0 |
unless $Marpa::R3::Internal_R::a->[0] <=> $Marpa::R3::Internal_R::b->[0] or $Marpa::R3::Internal_R::a->[1] <=> $Marpa::R3::Internal_R::b->[1] |
|
1389
|
490 |
267 |
unless $completion_link_data |
|
1400
|
267 |
0 |
if (defined $predecessor_ahm_id) |
|
1424
|
0 |
27 |
unless $Marpa::R3::Internal_R::a->[0] <=> $Marpa::R3::Internal_R::b->[0] or $Marpa::R3::Internal_R::a->[1] <=> $Marpa::R3::Internal_R::b->[1] |
|
1439
|
490 |
8 |
unless $leo_link_data |
|
1466
|
0 |
0 |
unless $Marpa::R3::Internal_R::a->[0] <=> $Marpa::R3::Internal_R::b->[0] or $Marpa::R3::Internal_R::a->[1] <=> $Marpa::R3::Internal_R::b->[1] |
|
1481
|
59 |
8 |
unless defined $leo_item_data |
|
1493
|
6 |
2 |
if (defined $predecessor_symbol_id) |
|
1538
|
0 |
0 |
if ($op_name eq 'lua') |
|
1543
|
0 |
0 |
if ($lua_op_name eq 'callback') { } |
|
1552
|
0 |
0 |
if ($op_name eq 'alternative') |
|
1574
|
20 |
717 |
if $ambiguity_level == 0 |
|
1575
|
0 |
717 |
if ($ambiguity_level != 1) |
|
1581
|
0 |
707 |
unless $value_ref |