Condition Coverage

blib/lib/Math/Calc/Parser.pm
Criterion Covered Total %
condition 62 72 86.1


and 3 conditions

line !l l&&!r l&&r condition
69 137 16 0 &Scalar::Util::blessed($_[0]) && $_[0]->isa('Math::Complex')
70 9 4 1 &Scalar::Util::blessed($_[0]) && $_[0]->isa('Math::Complex')
189 1 0 7 $args =~ /\A\d+\z/ and $args >= 0
231 851 0 0 defined $octal and length $octal
234 565 30 256 $binop_possible and $token ne ')'
595 6 250 $binop_possible and $token ne ')' and $token ne ','
36 239 11 $binop_possible and $token ne ')' and $token ne ',' and not defined _operator($token)
241 239 21 2 not $binop_possible and $token eq '-' || $token eq '+'
294 187 47 97 @$oper_stack and defined _operator(my $top_oper = $oper_stack->[-1])
295 13 26 19 $assoc eq 'left' and $oper_stat->{'equal_to'}{$top_oper}
326 1 29 23 @$oper_stack and $oper_stack->[-1] ne '('
329 1 0 29 @$oper_stack and $oper_stack->[-1] eq '('
331 8 0 21 @$oper_stack and $oper_stack->[-1] ne '('
8 3 18 @$oper_stack and $oper_stack->[-1] ne '(' and not defined _operator($oper_stack->[-1])
341 1 6 2 @$oper_stack and $oper_stack->[-1] ne '('
344 1 0 6 @$oper_stack and $oper_stack->[-1] eq '('
366 256 50 34 $bignum || $bigrat and defined $function->{'bignum_code'}
367 304 34 2 $bigrat and defined $function->{'bigrat_code'}

or 3 conditions

line l !l&&r !l&&!r condition
129 122 7 0 $singleton ||= $_[0]->new
179 1264 17 0 +(shift())->{'_functions'} ||= _default_functions()
241 22 1 0 $token eq '-' || $token eq '+'
258 39 41 337 $bignum or $bigrat
295 39 19 39 $oper_stat->{'lower_than'}{$top_oper} or $assoc eq 'left' and $oper_stat->{'equal_to'}{$top_oper}
366 48 36 256 $bignum || $bigrat