line |
true |
false |
branch |
32
|
1 |
9 |
if $line =~ /^\s*$/ |
34
|
3 |
7 |
if (my($name, $type) = $op =~ /^\s*var\s+([^:]+):(\S+)\s*$/) |
35
|
0 |
3 |
if (exists $vars{$name}) |
39
|
2 |
1 |
if ($type eq 'num' or $type eq 'n') { } |
|
1 |
0 |
elsif ($type eq 'pixel' or $type eq 'p' or $type eq 'c') { } |
53
|
1 |
6 |
if ($op =~ s/^\s*(\w+):\s*//) |
54
|
0 |
1 |
if ($labels{$1}) |
61
|
1 |
6 |
if $op =~ /^\s*$/ |
63
|
0 |
6 |
if ($op =~ /^\s*jump\s+(\w+)\s*$/) { } |
|
1 |
5 |
elsif (my($code, $reg, $targ) = $op =~ /^\s*(jumpz|jumpnz)\s+(\S+)\s+(\S+)\s*$/) { } |
|
0 |
5 |
elsif ($op =~ /^\s*print\s+(\S+)\s*/) { } |
|
1 |
4 |
elsif ($op =~ /^\s*ret\s+(\S+)\s*/) { } |
|
1 |
3 |
elsif ($op =~ s/\s*(\S+)\s*=\s*(\S+)\s*$//) { } |
|
3 |
0 |
elsif ($op =~ s/\s*(\S+)\s*=\s*(\S+)\s*//) { } |
83
|
0 |
3 |
unless ($attr->{$opcode}) |
106
|
1 |
12 |
if exists $self->{'constants'}{$name} |
107
|
10 |
3 |
if ($vars{$name}) { } |
|
3 |
0 |
elsif ($name =~ /^$numre$/) { } |
123
|
0 |
6 |
if ($op->[1] eq 'jump') { } |
|
1 |
5 |
elsif ($op->[1] =~ /^jump/) { } |
|
0 |
5 |
elsif ($op->[1] eq 'print') { } |
|
1 |
4 |
elsif ($op->[1] eq 'ret') { } |
124
|
0 |
0 |
unless (exists $labels{$op->[2]}) |
131
|
0 |
1 |
unless (exists $labels{$op->[3]}) |
148
|
0 |
4 |
if ($result =~ /^$numre$/) |
163
|
0 |
1 |
if (@ops and $ops[-1][0] ne "ret" and $ops[-1][0] ne "jump") |
170
|
0 |
1 |
if (@msgs) |