Branch Coverage

blib/lib/Mylisp/Match.pm
Criterion Covered Total %
branch 0 80 0.0


line true false branch
30 0 0 if (is_false($match))
53 0 0 if (get_char($c) eq "\n")
57 0 0 if ($c->{'pos'} > $c->{'maxpos'})
152 0 0 if ($char eq "\000")
163 0 0 if (get_char($c) eq "\000")
169 0 0 if ($c->{'pos'} == 0)
172 0 0 if (pre_char($c) eq "\n")
178 0 0 if (get_char($c) eq "\n")
181 0 0 if (get_char($c) eq "\000")
206 0 0 if (is_false($match))
219 0 0 unless (is_false($match))
233 0 0 if (is_bool($match))
236 0 0 if (is_str($match))
249 0 0 if (is_str($match))
262 0 0 if (is_false($match))
276 0 0 unless (is_false($match))
296 0 0 if (is_false($match))
297 0 0 if ($time < $min)
330 0 0 if ($char ne get_char($c))
340 0 0 if ($char ne get_char($c))
351 0 0 if (match_spp_catom($atom, $char))
362 0 0 if ($char eq "\000")
366 0 0 if (match_spp_catom($atom, $char))
400 0 0 if ($char eq "\000")
403 0 0 if (is_match_spp_cclass($cclass, $char))
488 0 0 if (exists $ns->{$name})
500 0 0 if (is_blank($value))
541 0 0 if (is_sym($sym))
554 0 0 if (is_sym($sym))
590 0 0 if (is_blank($array))
608 0 0 if (is_true($match))
612 0 0 if (is_atom($match))
620 0 0 if (is_true($match))
623 0 0 if (is_true($gather))
626 0 0 if (is_str($match))
627 0 0 if (is_str($gather))
632 0 0 if (is_str($gather))
635 0 0 if (is_atom($gather))
636 0 0 if (is_atom($match))
641 0 0 if (is_atom($match))