Condition Coverage

lib/B/DeparseTree/TreeMain.pm
Criterion Covered Total %
condition 27 124 21.7


and 3 conditions

line !l l&&!r l&&r condition
283 23 0 0 $sv->FLAGS & 2048 and $sv->can('RV')
361 0 0 0 $] > 5.0150051 and $self->{'curcv'}
0 0 0 $] > 5.0150051 and $self->{'curcv'} and $self->{'curcv'}->object_2svref == $ref->object_2svref
381 0 0 0 $self->{'in_subst_repl'} and $const =~ /^[0-9]/
514 2090 0 0 B::class($op) eq 'COP' and not $expr->{'text'}
543 7 0 0 defined $nseq and $nseq < $limit_seq
548 1352 0 0 defined $self->{'limit_seq'} and !defined($limit_seq) || $self->{'limit_seq'} < $limit_seq
578 0 0 0 not B::Deparse::null($cv->START) and B::Deparse::is_state($cv->START)
631 24856 0 24 class($op) eq 'PMOP' and ref $op->pmreplroot
24856 20 4 class($op) eq 'PMOP' and ref $op->pmreplroot and ${$op->pmreplroot;}
20 0 4 class($op) eq 'PMOP' and ref $op->pmreplroot and ${$op->pmreplroot;} and $op->pmreplroot->isa('B::OP')
818 0 0 0 $root->name eq 'leave' and ($kid = $root->first)->name eq 'enter'
0 0 0 $root->name eq 'leave' and ($kid = $root->first)->name eq 'enter' and not B::Deparse::null($kid = $kid->sibling)
0 0 0 $root->name eq 'leave' and ($kid = $root->first)->name eq 'enter' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'stub'
0 0 0 $root->name eq 'leave' and ($kid = $root->first)->name eq 'enter' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'stub' and not B::Deparse::null($kid = $kid->sibling)
0 0 0 $root->name eq 'leave' and ($kid = $root->first)->name eq 'enter' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'stub' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'null'
0 0 0 $root->name eq 'leave' and ($kid = $root->first)->name eq 'enter' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'stub' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'null' and class($kid) eq 'COP'
0 0 0 $root->name eq 'leave' and ($kid = $root->first)->name eq 'enter' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'stub' and not B::Deparse::null($kid = $kid->sibling) and $kid->name eq 'null' and class($kid) eq 'COP' and B::Deparse::null($kid->sibling)
1063 0 0 0 defined $use_dec and $self->{'expand'} < 5
1146 0 0 67 $key =~ /^feature_/ && $^V ge 5.15.6
1147 0 54 13 $is_feature and not $doing_features
1162 0 0 56 $key =~ /^feature_/ && $^V ge 5.15.6
1163 0 42 14 $is_feature and not $doing_features
1210 0 0 0 $warnings->isa('B::SPECIAL') and $$warnings == 4
0 0 0 $warnings->isa('B::SPECIAL') and $$warnings == 5
1223 0 0 0 defined $warning_bits and !defined($self->{'warnings'}) || $self->{'warnings'} ne $warning_bits
1309 2089 0 0 scalar @{$self->{'subs_todo'};} and $seq > $self->{'subs_todo'}[0][0]
1316 0 0 0 !$lexical && $cv && $cv->OUTSIDE
1317 0 0 0 not $lexical and $cv
0 0 0 not $lexical and $cv and ${\0 unless $cv->OUTSIDE;} != ${$self->{'curcv'};}

or 2 conditions

line l !l condition
575 0 0 $cv->FILE // ''
602 0 24880 $self->{'ops'}{$$op} ||= {}
661 12744 0 $self->{'ops'}{$$op} ||= {}
756 0 0 perlstring($/) || 'undef'
757 0 0 perlstring($O::savebackslash) || 'undef'

or 3 conditions

line l !l&&r !l&&!r condition
543 1345 0 7 not defined $limit_seq or defined $nseq and $nseq < $limit_seq
548 0 0 0 !defined($limit_seq) || $self->{'limit_seq'} < $limit_seq
576 0 0 0 $cvfile eq $0 or exists $self->{'files'}{$cvfile}
755 0 0 0 $/ ne "\n" or defined $O::savebackslash
966 0 0 1345 not defined $cv or $cv->isa('B::NULL')
1148 12 0 42 not exists $from->{$key} or $from->{$key} ne $to->{$key}
1170 3 0 2086 @features or @unfeatures
1223 0 0 0 !defined($self->{'warnings'}) || $self->{'warnings'} ne $warning_bits