Condition Coverage

blib/lib/Fortran/Format.pm
Criterion Covered Total %
condition 72 97 74.2


and 3 conditions

line !l l&&!r l&&r condition
292 116 905 0 @data and @data == $data_count
455 153 0 806 defined($char = shift @chars) and ++$pos
519 780 0 0 $DEBUG and defined $tok
530 83 77 364 defined $tok && $tok =~ /$patt/
814 795 2 19 $$self{'min'} and $$self{'min'} > length $s
823 774 21 21 defined $$self{'min'} and $$self{'min'} == 0
795 20 1 defined $$self{'min'} and $$self{'min'} == 0 and $s == 0
874 168 16 40 $f < 0 and $s =~ /[1-9]/
900 0 1 7 $s =~ /^ *-?(?:[\d ]*\.?[\d ]*)$/ and $s =~ /\d/
958 48 16 248 $scale <= 0 and -$precision < $scale
16 0 48 $scale > 0 and $precision + 2 > $scale
981 218 0 70 $d < 0 and $s =~ /[1-9]/
1308 1915 6 54 $start and not $started
1921 43 11 $start and not $started and $node != $start
1325 60 0 7 $start and not $started
60 3 4 $start and not $started and $node != $start
1340 116 862 43 $self->writer->reuse and $$self{'last_list'}
1351 37 7 3 $self->writer->reuse and $$self{'last_list'}

or 2 conditions

line l !l condition
948 104 208 $$self{'exp_width'} || 0
1038 16 16 $$self{'exp_width'} || 0

or 3 conditions

line l !l&&r !l&&!r condition
189 0 153 0 ref $class || $class
494 1 142 10 $state == 2 or $state == 3
143 0 10 $state == 2 or $state == 3 or $state == 5
0 0 10 $state == 1 or $state == 4
514 446 334 160 not defined $patt or defined $self->peek_tok($patt)
537 0 37 0 ref $class || $class
606 0 153 0 ref $class || $class
738 0 405 0 ref $class || $class
746 0 0 0 ref $class || $class
958 248 0 64 $scale <= 0 and -$precision < $scale or $scale > 0 and $precision + 2 > $scale
971 104 168 24 $$self{'exp_width'} or $exp_width != 3
1044 6 10 16 $exp < -1 or $exp >= $precision
1262 0 0 30 $tok =~ /^[+-]/ or $tok == 0