| line |
true |
false |
branch |
|
159
|
1 |
13 |
unless @$pipe |
|
161
|
0 |
13 |
if ref $src eq 'List::Gen::Thunk' |
|
162
|
3 |
10 |
isagen($src) ? : |
|
167
|
29 |
10 |
if ($fetch) { } |
|
169
|
0 |
29 |
if $mutable |
|
170
|
0 |
29 |
if ($size <= $pos) |
|
174
|
2 |
27 |
if ++$pos >= $size |
|
175
|
29 |
0 |
wantarray ? : |
|
181
|
10 |
16 |
unless @$pipe |
|
190
|
1 |
15 |
unless @$pipe |
|
192
|
0 |
15 |
if ref $src eq 'List::Gen::Thunk' |
|
194
|
5 |
10 |
if ($ref = ref $src) { } |
|
195
|
0 |
5 |
if ($ref eq 'ARRAY') { } |
|
|
2 |
3 |
elsif (isagen $src) { } |
|
|
0 |
3 |
elsif (eval {
do {
$src->isa('List::Gen::Pipe')
}
}) { } |
|
211
|
20 |
31 |
if ($type) { } |
|
212
|
0 |
20 |
if ($type eq 'array') { } |
|
|
20 |
0 |
elsif ($type eq 'gen') { } |
|
217
|
0 |
20 |
if $mutable |
|
218
|
0 |
20 |
if ($pos >= $size) |
|
227
|
21 |
10 |
if ($ref eq 'CODE') { } |
|
230
|
19 |
2 |
defined ${$got = \&$src();} ? : |
|
237
|
12 |
37 |
if (++$pos >= $size) |
|
242
|
10 |
21 |
unless @$pipe |
|
259
|
1 |
1 |
if (@_ == 1 and ref $_[0]) |
|
260
|
1 |
0 |
if isagen $_[0] |
|
261
|
0 |
0 |
if ref $_[0] eq 'ARRAY' |
|
266
|
1 |
1 |
unless @_ == 1 and ref $_[0] and isagen $_[0] |
|
300
|
10 |
2 |
if (@_) |
|
301
|
10 |
0 |
if (defined $_[0] and $_[0] =~ /^\d+$/) { } |
|
308
|
8 |
4 |
@_ ? : |
|
310
|
0 |
12 |
unless my($head) = $proto =~ /^([^;]*)(?:;.*)?$/ |
|
313
|
2 |
10 |
unless (defined $need) |
|
316
|
1 |
11 |
if ($need > 1 and $proto eq '@') |
|
323
|
0 |
19 |
unless @_ |
|
326
|
8 |
11 |
if (@_ < $need) { } |
|
|
11 |
0 |
elsif (@_ >= $need) { } |
|
334
|
11 |
0 |
if ($returns == 1) { } |
|
336
|
11 |
0 |
unless ($data) |
|
338
|
0 |
10 |
if ref $$data eq 'List::Gen::Thunk' |
|
347
|
0 |
0 |
unless ($data) |
|
348
|
0 |
0 |
ref $_ eq 'List::Gen::Thunk' ? : |
|
360
|
0 |
12 |
if ($returns > 1) |
|
390
|
0 |
0 |
if $_[2] |
|
398
|
0 |
0 |
$proto =~ /^\@(?!\@)/ ? : |
|
426
|
0 |
0 |
&List::Gen::isagen($_[0]) ? : |
|
433
|
0 |
0 |
if (defined wantarray and not wantarray) { } |
|
436
|
0 |
0 |
if ref $$args[0] eq 'List::Gen::Thunk' |
|
437
|
0 |
0 |
if &List::Gen::DEBUG() |
|
439
|
0 |
0 |
unless my $code = $$args[0]->can($method) |
|
444
|
0 |
0 |
unless $_[0]->can($method) |
|
453
|
0 |
0 |
wantarray ? : |