Branch Coverage
| blib/lib/Data/Stag/SxprParser.pm |
|
| Criterion |
Covered |
Total |
% |
| branch |
37 |
54 |
68.5
|
| line |
true |
false |
branch |
|
57
|
11 |
1945 |
if ($state eq 'init') |
|
58
|
7 |
4 |
if ($c eq '(') { } |
|
|
4 |
0 |
elsif ($c eq q[']) { } |
|
|
0 |
0 |
elsif ($c =~ /\s/) { } |
|
|
0 |
0 |
elsif ($c eq ';') { } |
|
78
|
0 |
1952 |
unless $state ne 'init' |
|
80
|
0 |
1952 |
if ($state eq 'c') |
|
82
|
0 |
0 |
if ($c eq "\n") |
|
87
|
0 |
1952 |
unless $state ne 'c' |
|
89
|
465 |
1487 |
if ($state eq 'q') |
|
90
|
62 |
403 |
if ($c eq '"') { } |
|
98
|
0 |
1487 |
unless $state ne 'q' |
|
100
|
62 |
1425 |
if ($c eq '"') |
|
104
|
0 |
1425 |
unless $state ne 'q' |
|
106
|
0 |
1425 |
if ($c eq ';') |
|
112
|
110 |
1315 |
if ($c eq '(') |
|
113
|
6 |
104 |
if ($state eq 'o') |
|
114
|
0 |
6 |
unless ($txt) |
|
123
|
110 |
1205 |
if ($c eq ')') |
|
124
|
1 |
109 |
if ($state eq 'o') { } |
|
125
|
0 |
1 |
unless ($txt) |
|
133
|
66 |
43 |
if ($txt) |
|
142
|
759 |
446 |
if ($state eq 'o') |
|
143
|
103 |
656 |
if ($c =~ /\s/) { } |
|
155
|
0 |
446 |
unless $state == 0 |
|
156
|
442 |
4 |
if ($c =~ /\s/) |
|
163
|
0 |
7 |
if ($txt =~ /\S/) |