Branch Coverage

blib/lib/Language/P/Toy/Opcodes/Regex.pm
Criterion Covered Total %
branch 40 40 100.0


line true false branch
42 60 33 $clear ? :
76 108 42 if $$cxt{'last_open'} < $group
96 170 110 if (@$st)
100 117 53 if ($pc >= 0)
101 31 86 if ($$bt{'btg'})
105 31 86 if $$bt{'g'}
113 57 106 if (@$stack) { }
183 217 114 if (substr($$cxt{'string'}, $$cxt{'pos'}, $$op{'length'}) ne $$op{'string'})
216 22 146 $$cxt{'btg'}{'btg'} ? :
217 20 148 if $c > 0 and defined $$op{'group'}
219 5 163 if ($c == $$op{'max'})
227 3 160 if ($$cxt{'pos'} == $$cxt{'btg'}{'lm'})
233 125 35 defined $$op{'subgroups_start'} && ($c == 0 || $c >= $$op{'min'}) ? :
236 65 95 if ($c == 0 and $$op{'min'} > 0) { }
79 16 elsif ($c >= $$op{'min'}) { }
253 7 153 if (not $$op{'greedy'} and $c >= $$op{'min'})
258 28 125 if defined $$op{'group'}
267 4 80 defined $$op{'subgroups_start'} ? :
301 5 2 if ($$cxt{'pos'} != 0)
312 1 2 if ($$cxt{'pos'} != $$cxt{'length'} and $$cxt{'pos'} != $$cxt{'length'} - 1 || substr($$cxt{'string'}, -1, 1) ne "\n")