blib/lib/Syntax/Keyword/Gather.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 14 | 78.5 |
line | true | false | branch |
---|---|---|---|
20 | 0 | 12 | unless defined wantarray |
26 | 0 | 4 | if not eval { do { &$code } } and $@ and not UNIVERSAL::isa($@, 'Syntax::Keyword::Gather::Break') |
27 | 11 | 1 | if wantarray |
28 | 1 | 0 | if defined wantarray |
33 | 1 | 5 | unless @{$gatherers{$caller};} |
39 | 1 | 73 | unless ((caller 3)[3] || '') eq 'Syntax::Keyword::Gather::gather' |
41 | 39 | 34 | unless @_ |