Branch Coverage

blib/lib/Mylisp.pm

Criterion	Covered	Total	%
branch	0	22	0.0

line	true	false	branch
28	0	0	if $line eq ''
30	0	0	if ($ok) { }
47	0	0	unless ($ok)
62	0	0	unless ($ok)
79	0	0	unless ($ok)
90	0	0	if (exists $table->{$name})
116	0	0	if (exists $table->{$name}) { }
128	0	0	if $name eq 'door'
130	0	0	if ($value eq 'define')
139	0	0	if (not $name ~~ ['Any', 'Str', 'Char', 'Cclass', 'Assert', 'Chclass', 'Nclass', 'Blank'])
181	0	0	if (exists $table->{$name}) { }