Branch Coverage

blib/lib/Tangence/Compiler/Parser.pm
Criterion Covered Total %
branch 24 36 66.6


line true false branch
89 0 15 if exists $package{$classname}
100 0 11 if exists $package{$structname}
115 0 2 if exists $package{$classname}
121 15 13 if ($(Syntax::Keyword::Match/topic) eq 'class') { }
11 2 elsif ($(Syntax::Keyword::Match/topic) eq 'struct') { }
2 0 elsif ($(Syntax::Keyword::Match/topic) eq 'include') { }
176 0 24 if exists $methods{$methodname}
199 0 13 if exists $events{$eventname}
214 24 68 if ($_ eq "smashed")
221 0 92 if exists $properties{$propname}
243 24 107 if ($(Syntax::Keyword::Match/topic) eq 'method') { }
13 94 elsif ($(Syntax::Keyword::Match/topic) eq 'event') { }
92 2 elsif ($(Syntax::Keyword::Match/topic) eq 'smashed' or $(Syntax::Keyword::Match/topic) eq 'prop') { }
2 0 elsif ($(Syntax::Keyword::Match/topic) eq 'isa') { }
246 0 2 unless my $super = $_package->{$supername}
290 55 0 if ($(Syntax::Keyword::Match/topic) eq "field")
293 0 55 if exists $fieldnames{$fieldname}
354 0 208 unless grep {$_ eq $typename;} @basic_types