| line |
true |
false |
branch |
|
40
|
18 |
0 |
defined $_[1] ? : |
|
41
|
18 |
23 |
defined $_[1] ? : |
|
42
|
19 |
19 |
defined $_[1] ? : |
|
43
|
19 |
16 |
defined $_[1] ? : |
|
118
|
0 |
21 |
unless defined($token = $input->peek) |
|
120
|
20 |
1 |
if ($token->type eq '{') { } |
|
|
1 |
0 |
elsif ($token->type =~ /^[:\n]$/) { } |
|
143
|
0 |
226 |
if ($type eq '{') { } |
|
|
1 |
225 |
elsif ($type eq 'endm') { } |
|
|
19 |
206 |
elsif ($type eq '}') { } |
|
|
8 |
198 |
elsif ($type eq 'NAME' and $last_stmt_end) { } |
|
149
|
1 |
0 |
if $opened_brace |
|
155
|
0 |
19 |
if ($parens > 0) { } |
|
161
|
19 |
0 |
if $opened_brace |
|
172
|
67 |
131 |
if $type eq "\n" |
|
178
|
1 |
19 |
unless defined $token |
|
180
|
0 |
19 |
unless $parens == 0 |
|
207
|
0 |
23 |
unless defined $start_token |
|
217
|
16 |
202 |
unless defined $token |
|
222
|
34 |
168 |
if ($token->type eq 'NAME') { } |
|
224
|
15 |
19 |
if (exists $args->{$name}) { } |
|
|
19 |
0 |
elsif (exists $self->locals->{$name}) { } |
|
275
|
2 |
20 |
unless defined $token and not $token->type =~ /^[:\n,]$/ |
|
281
|
10 |
9 |
if ($i != $#params) |
|
283
|
1 |
9 |
unless defined $token and $token->type eq "," |
|
292
|
3 |
16 |
unless not defined $token or $token->type =~ /^[:\n]$/ |
|
312
|
19 |
28 |
if ($type =~ /^[:\n,]$/ and $parens == 0) { } |
|
|
2 |
26 |
elsif ($type eq '{') { } |
|
|
1 |
25 |
elsif ($type eq '}') { } |
|
317
|
0 |
2 |
if $opened_brace++ |
|
321
|
1 |
0 |
if ($parens > 0) { } |
|
323
|
0 |
1 |
if --$opened_brace |
|
327
|
0 |
0 |
if $opened_brace |
|
336
|
1 |
19 |
if $parens != 0 |