Branch Coverage

File:blib/lib/Language/Nouse.pm
Coverage:69.4%

line%coveragebranch
64100TFif $this_mul =~ /[a-z]/
6550TFif $this_mul eq '_'
86100TFif ($token =~ /(cut|paste|read|write|add|test|swap) (\d+)/i) { }
50TFelsif ($token =~ /(\d+)/) { }
9150TFif ($op eq 'cut') { }
50TFelsif ($op eq 'paste') { }
100TFelsif ($op eq 'read') { }
100TFelsif ($op eq 'write') { }
100TFelsif ($op eq 'add') { }
100TFelsif ($op eq 'test') { }
50TFelsif ($op eq 'swap') { }
12150TFif ($mul == 36) { }
100TFelsif ($mul > 9) { }
13750TFunless defined $per_line
14550TFif ($op == 0) { }
50TFelsif ($op == 1) { }
100TFelsif ($op == 2) { }
100TFelsif ($op == 3) { }
100TFelsif ($op == 4) { }
100TFelsif ($op == 5) { }
50TFelsif ($op == 6) { }
188100TFif ($op == 0)
196100TFif ($op == 1)
19950TFif (scalar @{$$self{'stack'};}) { }
20650TFif ($op == 2)
2090TFif (defined $in)
214100TFif ($op == 3)
21650TFif (scalar @{$$self{'stack'};})
221100TFif ($op == 4)
22350TFif (scalar @{$$self{'stack'};})
23150TFif ($op == 5)
2330TFif (scalar @{$$self{'stack'};})
2360TFif ($oprand == $self->_peek)
242100TFif ($op == 6)
256100TFif ($s == 0)
27650TFif not scalar @{$$self{'ring'};}