| line |
true |
false |
branch |
|
118
|
12 |
12 |
unless (defined $initial_load) |
|
121
|
1 |
11 |
if (not @arguments or $arguments[0] ne '-nofilter') { } |
|
124
|
11 |
0 |
if @arguments |
|
126
|
1 |
11 |
unless grep {$_ eq 'Decl::Semantics';} @arguments |
|
138
|
0 |
0 |
if defined $_ |
|
|
12 |
0 |
unless (grep {$import_module eq $_ if defined $_;} @semantic_classes) |
|
140
|
0 |
12 |
if ($@) { } |
|
174
|
297 |
1548 |
$$self{'build_handlers'} ? : |
|
177
|
4 |
1841 |
defined $apptag ? : |
|
178
|
81 |
1764 |
defined $classtag ? : |
|
182
|
0 |
1845 |
if not defined $tagdef and defined $apptag |
|
183
|
0 |
1845 |
if not defined $tagdef and defined $classtag |
|
191
|
1523 |
1199 |
if (defined $$parent{'parsemode'} and $$parent{'parsemode'} eq 'vanilla') |
|
192
|
70 |
1453 |
defined $$parent{'vanilla_class'} ? : |
|
199
|
85 |
1114 |
if defined $tagdef |
|
203
|
468 |
646 |
unless blessed $parent |
|
207
|
0 |
646 |
if (defined $t and $t->parameter('vanilla')) |
|
217
|
2 |
156 |
ref $self ? : |
|
221
|
278 |
0 |
unless (defined $domain_tag) |
|
225
|
0 |
278 |
if ($within) |
|
233
|
0 |
0 |
if $_->is('within') |
|
251
|
320 |
655 |
if ($vanilla_class) { } |
|
257
|
12 |
963 |
if ($newnode->flag('.')) { } |
|
|
1 |
962 |
elsif ($newnode->flag('*')) { } |
|
|
0 |
962 |
elsif ($newnode->flag('+')) { } |
|
305
|
2 |
2 |
if (($status = filter_read()) > 0) { } |
|
|
1 |
1 |
elsif (not $$self{'start'}) { } |
|
306
|
1 |
1 |
if ($$self{'start'}) |
|
382
|
0 |
2071 |
if $possible |
|
396
|
0 |
975 |
if defined $linep and $linep eq 'none' |
|
410
|
21 |
772 |
if $$node{'parsemode'} eq 'text' |
|
413
|
1 |
771 |
if $bodyp eq 'text' and $$node{'parsemode'} eq 'vanilla' |
|
414
|
771 |
1 |
if $bodyp eq 'vanilla' |
|
428
|
1 |
319 |
unless $p |
|
482
|
15 |
12 |
if (defined $_[0]) |
|
506
|
158 |
39 |
if (defined $_[0]) |
|
521
|
0 |
54 |
unless defined $class |
|
522
|
27 |
27 |
if defined $$self{'semtags'}{$class} |
|
525
|
27 |
0 |
unless $$self{'controller'} |
|
567
|
0 |
0 |
unless (defined $str and $str) |
|
571
|
0 |
0 |
unless (defined $$self{'id_list'}{$str}) |
|
611
|
2 |
2 |
unless defined $macro_ok |
|
614
|
0 |
4 |
if $use |
|
617
|
12 |
15 |
if (not ref $_) { } |
|
|
0 |
15 |
elsif ($$_{'macroresult'} and not $macro_ok) { } |
|
637
|
4 |
0 |
if $_->name eq $data |
|
638
|
0 |
0 |
if $_->is($data) |
|
681
|
36 |
0 |
if (defined $coderef) |
|
685
|
0 |
36 |
wantarray ? : |