line |
true |
false |
branch |
21
|
0 |
21 |
if ($command eq 'for') { } |
|
0 |
21 |
elsif ($command eq 'begin') { } |
|
0 |
21 |
elsif ($command eq 'end') { } |
|
21 |
0 |
elsif ($command =~ /^head(\d+)/) { } |
24
|
0 |
0 |
unless $target eq 'test' |
26
|
0 |
0 |
if $directive eq 'ignore' |
27
|
0 |
0 |
if $directive eq 'ignore_all' |
35
|
0 |
0 |
unless $target eq 'test' |
41
|
0 |
0 |
unless $target eq 'test' |
49
|
7 |
14 |
unless $parser->{'tps'}->is_extracting_functions or $parser->{'tps'}->is_extracting_methods |
54
|
1 |
27 |
if ($level <= $parser->{$type}) |
59
|
2 |
12 |
if ($paragraph =~ /^\s*METHODS\s*$/) |
65
|
2 |
10 |
if ($paragraph =~ /^\s*FUNCTIONS\s*$/) |
71
|
0 |
10 |
if $parser->{'tps_ignore'} or $parser->{'tps_ignore_all'} |
79
|
0 |
3 |
unless $level == 1 + $master_level |
86
|
2 |
1 |
if ($parser->{'tps_method_level'}) |
87
|
0 |
2 |
if ($paragraph =~ /^new/) { } |
103
|
9 |
0 |
unless $_[0]{'tps_within_begin_test'} |
113
|
4 |
2 |
unless $self->{'tps'}->is_extracting_verbatim_bits |
116
|
0 |
2 |
if $self->{'tps_ignore'} || $self->{'tps_ignore_all'} and not $self->{'tps_within_begin_test'} |