| blib/lib/Language/P/Intermediate/Generator.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 23 | 29 | 79.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 314 | 40 | 0 | 2 | $tree->function == 167 and not $tree->arguments |
| 951 | 1 | 58 | 0 | $node and !$to_outer || $node != $to_outer |
| 952 | 33 | 1 | 10 | $node->isa('Language::P::ParseTree::Block') and not $node->isa('Language::P::ParseTree::BareBlock') |
| line | l | !l | condition |
|---|---|---|---|
| 73 | 21 | 158 | $is_sub || 0 |
| 198 | 0 | 0 | $outfile || die("Can't open '${outfile}': $!") |
| 547 | 11 | 19 | $self->_code_segments->[0]->lexicals->{$tree} ||= {'level', $level, 'lexical', $tree} |
| 1030 | 270 | 81 | $tree->get_attribute('context') || 0 |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 413 | 9 | 10 | 146 | $tree->op == 96 or $tree->op == 98 |
| 453 | 3 | 0 | 86 | $tree->op == 96 or $tree->op == 98 |
| 951 | 1 | 43 | 14 | !$to_outer || $node != $to_outer |
| 1133 | 2 | 2 | 0 | $end ||= _new_block($self) |