| line | % | coverage | branch |
|---|
| 53 | 50 | T | F | if exists $$self{'VERSION'} and $$self{'VERSION'} < $COMPATIBLE |
| 59 | 50 | T | F | if ref $class |
| 71 | 50 | T | F | if ($$self{'DEBUG'}) { } |
| 74 | 0 | T | F | if $@ |
| 85 | 100 | T | F | unless exists $$self{'USER'} |
| 137 | 0 | T | F | if $index < 0 and -$index <= @{$$self{'STACK'};} |
| 193 | 50 | T | F | if @_ |
| 201 | 0 | T | F | if @_ |
| 208 | 0 | T | F | if @_ |
| 216 | 100 | T | F | unless $class->isa('Parse::Eyapp::Node') |
| 223 | 0 | T | F | unless $class->isa('Parse::Eyapp::TranslationScheme') |
| 251 | 100 | T | F | if ($self->YYIssemantic($_)) |
| 255 | 50 | T | F | if UNIVERSAL::can($ch, 'id') |
| 258 | 100 | T | F | if $self->YYIsterm($_) |
| 260 | 50 | T | F | if (UNIVERSAL::isa($ch, $PREFIX . '_PAREN')) |
| 292 | 100 | T | F | if ($self->YYIsterm($_)) |
| 298 | 50 | T | F | if (UNIVERSAL::isa($ch, $PREFIX . '_PAREN')) |
| 304 | 100 | T | F | if (UNIVERSAL::isa($ch, $PREFIX . '_CODE')) |
| 312 | 100 | T | F | if (unpack('A1', $lhs) eq '@') { } |
| 313 | 50 | T | F | unless $lhs =~ /^\@[0-9]+\-([0-9]+)$/ |
| 317 | 50 | T | F | unless exists $_[$dotpos] and UNIVERSAL::isa($_[$dotpos], 'CODE') |
| 341 | 50 | T | F | if ($self->YYIssemantic($_)) |
| 347 | 100 | T | F | if $self->YYIsterm($_) |
| 348 | 50 | T | F | if (ref $ch eq $PREFIX . '_PAREN') |
| 381 | 50 | T | F | if ($self->YYIssemantic($_)) |
| 387 | 50 | T | F | if $self->YYIsterm($_) |
| 388 | 100 | T | F | if (ref $ch eq $PREFIX . '_PAREN') |
| 406 | 0 | T | F | if @_ |
| 414 | 0 | T | F | if @_ |
| 443 | 50 | T | F | unless exists $$checklist{$prm} |
| 445 | 50 | T | F | unless ref $value eq $$checklist{$prm} |
| 451 | 50 | T | F | unless exists $$outhash{$_} |
| 464 | 0 | T | F | if exists ${'Parse::Eyapp::Driver::';}{'_DBParse'} |
| 470 | 0 | T | F | unless open DRV, "<$fname" |
| 473 | 0 | T | F | if (/^\s*sub\s+_Parse\s*{\s*$/ .. /^\s*}\s*#\s*_Parse\s*$/) |
| 529 | 100 | T | F | if (exists $$actions{'ACTIONS'}) { } |
| 532 | 100 | T | F | unless (defined $$token) |
| 538 | 100 | T | F | exists $$actions{'DEFAULT'} ? : |
| 100 | T | F | exists $$actions{'ACTIONS'}{$$token} ? : |
| 551 | 100 | T | F | if (defined $act) |
| 554 | 100 | T | F | if ($act > 0) |
| 560 | 100 | T | F | if ($$errstatus) |
| 575 | 100 | T | F | if $$token ne '' |
| 588 | 100 | T | F | unless $act |
| 594 | 100 | T | F | if (unpack('A1', $lhs) eq '@') |
| 595 | 50 | T | F | unless $lhs =~ /^\@[0-9]+\-([0-9]+)$/ |
| 602 | 100 | T | F | $$dotpos ? : |
| 607 | 100 | T | F | @sempar ? : |
| 100 | T | F | $code ? : |
| 613 | 100 | T | F | if ($$check eq 'ACCEPT') |
| 622 | 50 | T | F | if ($$check eq 'ABORT') |
| 635 | 50 | T | F | unless ($$check eq 'ERROR') |
| 663 | 100 | T | F | unless ($$errstatus) |
| 667 | 50 | T | F | unless $$errstatus |
| 681 | 100 | T | F | if ($$errstatus == 3) |
| 683 | 50 | T | F | if ($$token eq '') |
| 709 | 50 | T | F | unless (@$stack) |