Branch Coverage

blib/lib/RPerl/Operation/Statement/VariableModification.pm
Criterion Covered Total %
branch 14 24 58.3


line true false branch
33 4 276 if ($self_class eq 'SubExpressionOrVarMod_162') { }
276 0 elsif ($self_class eq 'Statement_170') { }
45 257 23 if ($self_class eq 'VariableModification_199') { }
23 0 elsif ($self_class eq 'VariableModification_200') { }
101 0 30 if ($self_class eq 'SubExpressionOrVarMod_162') { }
30 0 elsif ($self_class eq 'Statement_170') { }
113 23 7 if ($self_class eq 'VariableModification_199') { }
7 0 elsif ($self_class eq 'VariableModification_200') { }
124 0 23 if (ref $subexpression_or_stdin eq 'SubExpressionOrInput_158' and exists $subexpression_or_stdin->{'children'} and defined $subexpression_or_stdin->{'children'} and defined $subexpression_or_stdin->{'children'}[0] and ref $subexpression_or_stdin->{'children'}[0] eq 'SubExpression_150')
135 0 0 if ($rhs_is_undef and ref $variable eq 'Variable_191' and exists $variable->{'children'} and defined $variable->{'children'} and defined $variable->{'children'}[1] and ref $variable->{'children'}[1] eq '_STAR_LIST' and exists $variable->{'children'}[1]{'children'} and defined $variable->{'children'}[1]{'children'} and defined $variable->{'children'}[1]{'children'}[-1] and ref $variable->{'children'}[1]{'children'}[-1] eq 'VariableRetrieval_192' and exists $variable->{'children'}[1]{'children'}[-1]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1] and ref $variable->{'children'}[1]{'children'}[-1]{'children'}[1] eq 'SubExpression_149' and exists $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0] and ref $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0] eq 'Expression_143' and exists $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'} and defined Deparse error: panic: attempt to copy freed scalar 99e4f58 to 99e0e50 at /usr/local/lib/perl5/5.26.1/B/Deparse.pm line 4180. and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0] and ref $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0] eq 'Operator_107' and exists $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[1] and $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[1] eq '- ' and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2] and ref $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2] eq 'SubExpression_151' and exists $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'}[0] and ref $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'}[0] eq 'Literal_248' and exists $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'}[0]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'}[0]{'children'} and defined $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'}[0]{'children'}[0] and $variable->{'children'}[1]{'children'}[-1]{'children'}[1]{'children'}[0]{'children'}[0]{'children'}[2]{'children'}[0]{'children'}[0] eq '1')
178 0 23 if ($rhs_is_undef and $lhs_is_array_retrieval_minus_one) { }
217 30 0 if (defined $semicolon)