line |
true |
false |
branch |
70
|
0 |
1 |
if exists $self->{'VERSION'} and $self->{'VERSION'} < $Text::Spintax::Parse::Yapp::Driver::COMPATIBLE |
75
|
0 |
1 |
if ref $class |
87
|
0 |
1 |
if ($self->{'DEBUG'}) { } |
90
|
0 |
0 |
if $@ |
102
|
1 |
41 |
unless exists $self->{'USER'} |
154
|
0 |
0 |
if $index < 0 and -$index <= @{$self->{'STACK'};} |
163
|
0 |
0 |
if @_ |
171
|
0 |
0 |
if @_ |
200
|
0 |
5 |
unless exists $checklist->{$prm} |
202
|
0 |
5 |
unless ref $value eq $checklist->{$prm} |
208
|
0 |
3 |
unless exists $outhash->{$_} |
222
|
0 |
0 |
if exists do {
'Text::Spintax::Parse::Yapp::Driver::'
}->{'_DBParse'} |
226
|
0 |
0 |
unless open DRV, "<$fname" |
229
|
0 |
0 |
if (/^\s*sub\s+_Parse\s*{\s*$/ .. /^\s*}\s*#\s*_Parse\s*$/) |
285
|
8 |
25 |
if (exists $actions->{'ACTIONS'}) { } |
288
|
8 |
0 |
unless (defined $$token) |
298
|
0 |
0 |
exists $actions->{'DEFAULT'} ? : |
|
8 |
0 |
exists $actions->{'ACTIONS'}{$$token} ? : |
307
|
33 |
0 |
if (defined $act) |
310
|
8 |
25 |
if ($act > 0) |
316
|
0 |
8 |
if ($$errstatus) |
331
|
7 |
1 |
if $$token ne '' |
344
|
1 |
24 |
unless $act |
350
|
0 |
25 |
if (unpack('A1', $lhs) eq '@') |
351
|
0 |
0 |
unless $lhs =~ /^\@[0-9]+\-([0-9]+)$/ |
358
|
21 |
4 |
$$dotpos ? : |
361
|
10 |
4 |
@sempar ? : |
|
11 |
14 |
$code ? : |
367
|
1 |
24 |
if ($$check eq 'ACCEPT') |
376
|
0 |
24 |
if ($$check eq 'ABORT') |
389
|
24 |
0 |
unless ($$check eq 'ERROR') |
417
|
0 |
0 |
unless ($$errstatus) |
421
|
0 |
0 |
unless $$errstatus |
435
|
0 |
0 |
if ($$errstatus == 3) |
437
|
0 |
0 |
if ($$token eq '') |
463
|
0 |
0 |
unless (@$stack) |