| line |
true |
false |
branch |
|
355
|
18 |
22 |
unless $args{'-declare'}
|
|
|
22 |
18 |
if (my(@orig_declare) = @{[] unless $args{'-declare'};})
|
|
361
|
1 |
62 |
if $type =~ /::/
|
|
402
|
21 |
248 |
if (defined(my $params = shift @_))
|
|
406
|
20 |
1 |
if (builtin::reftype($params) eq 'ARRAY') { }
|
|
|
1 |
0 |
elsif (not defined $type_constraint) { }
|
|
417
|
210 |
58 |
defined $type_constraint ? :
|
|
426
|
3 |
265 |
if (@_) { }
|
|
493
|
0 |
12 |
unless my $tobj = find_type_constraint($full)
|
|
497
|
5 |
7 |
unless $tobj->check($return)
|
|
515
|
0 |
13 |
unless my $tobj = find_type_constraint($full)
|