Branch Coverage

blib/lib/Language/P/Toy/Generator.pm
Criterion Covered Total %
branch 57 62 91.9


line true false branch
44 0 0 if ($option eq 'dump-ir')
120 15 31 if ($is_sub) { }
16 15 elsif ($is_regex) { }
156 387 2025 if $$ins{'label'}
159 0 2025 unless $name
161 1133 892 if (my $sub = $opcode_map{$$ins{'opcode_n'}}) { }
164 276 616 $$ins{'attributes'} ? :
165 3 889 if $p{'slot'}
181 13 33 if defined $segment->name
209 15 31 if $self->_generated->{$segment}
233 15 16 if $args and $$args{'file_name'}
248 15 15 if ($self->_code->isa('Language::P::Toy::Value::Subroutine')) { }
261 1 293 if ($$op{'attributes'}{'slot'} == 5)
268 0 293 unless $slot
278 8 20 $$op{'attributes'}{'lexical'}->closed_over ? :
288 3 5 $$op{'attributes'}{'lexical'}->closed_over ? :
347 24 19 if exists $self->_temporary_map->{$index}
414 4 6 if exists $lex_map{$pad}{$lexical}
430 16 30 unless $pad
431 3 27 $lex_map{$pad} ? :
435 2261 38 unless $$op{'lexical'}
437 16 22 unless (exists $map{$$op{'lexical'}})
438 5 11 if ($$op{'lexical'}->name eq '_' and $$op{'lexical'}->sigil == 2) { }
4 7 elsif ($$op{'lexical'}->closed_over) { }
444 4 0 if ($level) { }
448 2 2 if ($code_from->is_subroutine) { }
459 2 1 if $index == -1
476 11 27 if ($$op{'lexical'}->closed_over)
480 6 32 if $$op{'lexical'}->closed_over and not $$op{'level'}
485 28 2 unless @{$self->_code->closed;}
486 24 6 unless ($needs_pad)