Branch Coverage

blib/lib/MooseX/Declare/Context.pm
Criterion Covered Total %
branch 16 20 80.0


line true false branch
221 1 63 unless $len
255 61 0 unless exists $args{'inject_cleanup_code_parts'}
264 61 0 if ($args{'inject_cleanup_code_parts'})
271 60 1 if ($self->peek_next_char eq '{') { }
278 0 1 unless $self->peek_next_char eq ';'
282 0 1 unless exists $args{'missing_block_handler'}
297 183 4 unless ref $section
304 313 61 !ref($_) ? :
330 1 64 if substr($linestr, $self->offset, 1) =~ /[{;]/
336 3 61 if not defined $word or $word =~ /^(?:extends|with|is)$/