| line |
true |
false |
branch |
|
111
|
0 |
0 |
if (@_ > 1) |
|
114
|
0 |
0 |
if (not ref($arg) =~ /ARRAY|Array|Map|Tuple/u) { } |
|
115
|
0 |
0 |
if $FIXME |
|
166
|
0 |
0 |
if (ref $tn eq 'ARRAY') |
|
169
|
0 |
0 |
if ($tn =~ /^[a-z]|Bool|String|Int|Float|Double/u) { } |
|
177
|
0 |
0 |
if (ref $td eq 'Array' or ref $td eq 'Map' or ref $td eq 'Tuple') { } |
|
189
|
0 |
0 |
if iscontainer($td) |
|
196
|
0 |
0 |
if (ref $v eq 'Functional::Types') { } |
|
224
|
0 |
0 |
if $VV |
|
225
|
0 |
0 |
if $VV |
|
226
|
0 |
0 |
if $VV |
|
228
|
0 |
0 |
if (ref $t1 eq 'Functional::Types') |
|
231
|
0 |
0 |
if (ref $t2 eq 'Functional::Types') |
|
234
|
0 |
0 |
if (iscontainer($t1)) { } |
|
236
|
0 |
0 |
if (not iscontainer($t2)) { } |
|
240
|
0 |
0 |
if ($tn1 ne $tn2) { } |
|
250
|
0 |
0 |
unless ($st) |
|
263
|
0 |
0 |
ref $t1 eq 'Scalar' ? : |
|
|
0 |
0 |
ref $t1 eq '' ? : |
|
|
0 |
0 |
ref $t1 eq 'ARRAY' ? : |
|
264
|
0 |
0 |
ref $t2 eq 'Scalar' ? : |
|
|
0 |
0 |
ref $t2 eq '' ? : |
|
|
0 |
0 |
ref $t2 eq 'ARRAY' ? : |
|
265
|
0 |
0 |
if ($tn1 =~ /^[a-z]/u and not $tn2 =~ /^[a-z]/u) { } |
|
|
0 |
0 |
elsif ($tn2 =~ /^[a-z]/u and not $tn1 =~ /^[a-z]/u) { } |
|
323
|
0 |
0 |
if ($t eq $$val{'Type'}[1]) { } |
|
333
|
0 |
0 |
if ($VV) |
|
340
|
0 |
0 |
if (scalar @_ == 1 and ref $_[0] eq 'HASH') { } |
|
345
|
0 |
0 |
if $VV |
|
347
|
0 |
0 |
if $VV |
|
348
|
0 |
0 |
if (ref($arg) =~ /OLD/u) { } |
|
|
0 |
0 |
elsif (ref $arg eq 'Variant') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'Record') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'NamedRecord') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'Function') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'Array') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'Map') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'Tuple') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'Scalar') { } |
|
|
0 |
0 |
elsif (ref $arg eq 'HASH') { } |
|
353
|
0 |
0 |
if $VV |
|
357
|
0 |
0 |
if (ref $t ne 'ARRAY') |
|
378
|
0 |
0 |
@_ > 1 ? : |
|
384
|
0 |
0 |
if $VV |
|
386
|
0 |
0 |
if $VV |
|
387
|
0 |
0 |
if (ref $elt eq 'Functional::Types') { } |
|
389
|
0 |
0 |
if (defined $$tn[3]) |
|
392
|
0 |
0 |
if (not $tc_tn =~ /^[a-z]/u) { } |
|
395
|
0 |
0 |
unless ($st) |
|
403
|
0 |
0 |
unless (isprim($tc_tn)) |
|
429
|
0 |
0 |
if (ref $elt eq 'Functional::Types') { } |
|
432
|
0 |
0 |
unless (typecheck($tn, $tc_tn)) |
|
437
|
0 |
0 |
unless (isprim($$tc_tn[0])) |
|
458
|
0 |
0 |
if (ref $elt eq 'Functional::Types') { } |
|
|
0 |
0 |
elsif (not isprim($$tc[0])) { } |
|
462
|
0 |
0 |
unless ($st) |
|
485
|
0 |
0 |
@_ == 1 && ref $_[0] eq 'ARRAY' ? : |
|
487
|
0 |
0 |
unless (isprim($elt_type)) |
|
488
|
0 |
0 |
unless ($$tc[1] ~~ $$v[0]{'Type'}[1]) |
|
512
|
0 |
0 |
if (not defined $arg) { } |
|
513
|
0 |
0 |
if $VV |
|
514
|
0 |
0 |
if (isprim($t)) { } |
|
521
|
0 |
0 |
if $VV |
|
523
|
0 |
0 |
if (isprim($tn)) { } |
|
571
|
0 |
0 |
if (@rest) |
|
574
|
0 |
0 |
if $VV |
|
576
|
0 |
0 |
if (istypedval($tv)) { } |
|
578
|
0 |
0 |
unless ($st) |
|
583
|
0 |
0 |
if (ref $t_from_v eq 'Variant') { } |
|
|
0 |
0 |
elsif (ref $t_from_v eq 'Record') { } |
|
|
0 |
0 |
elsif (ref $t_from_v eq 'NamedRecord') { } |
|
|
0 |
0 |
elsif (ref $t_from_v eq 'Scalar') { } |
|
584
|
0 |
0 |
if (ref $$t{'Type'} eq 'Variant') { } |
|
585
|
0 |
0 |
if ($$t_from_v[3] eq $$t{'Type'}[3]) { } |
|
589
|
0 |
0 |
if ($$t_from_v[3] eq $$t{'Type'}[0]) { } |
|
596
|
0 |
0 |
if ($$t_from_v[3] eq $$t{'Type'}[0]) { } |
|
601
|
0 |
0 |
if ($$t_from_v[3] eq $$t{'Type'}[0]) { } |
|
614
|
0 |
0 |
if (isprim($$t{'Type'}[0])) { } |
|
|
0 |
0 |
elsif (isprim($$t{'Type'}[1])) { } |
|
626
|
0 |
0 |
if (iscontainer($$t{'Type'})) { } |
|
|
0 |
0 |
elsif (ref $tv eq 'CODE') { } |
|
627
|
0 |
0 |
if $FIXME |
|
638
|
0 |
0 |
if (ref $t eq 'CODE') |
|
642
|
0 |
0 |
if (@args == 0) |
|
650
|
0 |
0 |
if (istypedval($arg)) { } |
|
|
0 |
0 |
elsif (isprim($argtype)) { } |
|
653
|
0 |
0 |
unless ($st) |
|
656
|
0 |
0 |
if (isprim($argtype)) { } |
|
|
0 |
0 |
elsif (isprimcontainer($argtype)) { } |
|
670
|
0 |
0 |
if (ref $retval ne 'Functional::Types') { } |
|
672
|
0 |
0 |
if (ref $ret_type eq 'ARRAY') |
|
675
|
0 |
0 |
if (isprim($ret_type)) { } |
|
|
0 |
0 |
elsif (isprimcontainer($ret_type)) { } |
|
701
|
0 |
0 |
if $VV |
|
702
|
0 |
0 |
if (ref $th eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $th eq 'Functional::Types') { } |
|
713
|
0 |
0 |
unless (defined $k) |
|
716
|
0 |
0 |
if ($k ne '@' and $k ne '$' and $k ne '%' and $k ne '*') { } |
|
|
0 |
0 |
elsif ($k eq '&') { } |
|
717
|
0 |
0 |
if (ref $val eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $val eq 'HASH') { } |
|
|
0 |
0 |
elsif (ref $val eq 'Functional::Types') { } |
|
720
|
0 |
0 |
if $VV |
|
727
|
0 |
0 |
if (istypedval($val)) { } |
|
730
|
0 |
0 |
if $VV |
|
735
|
0 |
0 |
if $VV |
|
743
|
0 |
0 |
if $VV |
|
768
|
0 |
0 |
if (ref $tn eq 'ARRAY') |
|
771
|
0 |
0 |
if ($tn eq 'String') { } |
|
|
0 |
0 |
elsif ($tn eq 'Bool') { } |
|
774
|
0 |
0 |
$v ? : |
|
783
|
0 |
0 |
if $VV |
|
784
|
0 |
0 |
if $VV |
|
785
|
0 |
0 |
if (ref $tv eq 'Functional::Types') { } |
|
792
|
0 |
0 |
if ($t->isa('Scalar')) { } |
|
|
0 |
0 |
elsif ($t->isa('Array')) { } |
|
|
0 |
0 |
elsif ($t->isa('Map')) { } |
|
|
0 |
0 |
elsif ($t->isa('Tuple')) { } |
|
|
0 |
0 |
elsif ($t->isa('Record')) { } |
|
|
0 |
0 |
elsif ($t->isa('NamedRecord')) { } |
|
|
0 |
0 |
elsif ($t->isa('Variant')) { } |
|
|
0 |
0 |
elsif ($t->isa('Function')) { } |
|
800
|
0 |
0 |
if (isprim($tn)) { } |
|
817
|
0 |
0 |
if (isprim($hvt)) { } |
|
842
|
0 |
0 |
isprim($et) ? : |
|
854
|
0 |
0 |
isprim($et) ? : |
|
855
|
0 |
0 |
if ($sv =~ /\s/u) |
|
873
|
0 |
0 |
isprim($ft) ? : |
|
874
|
0 |
0 |
if ($sv =~ /\s/u) |
|
881
|
0 |
0 |
if (defined $v) { } |
|
882
|
0 |
0 |
if (ref $v eq 'ARRAY' and @{$v;}) { } |
|
|
0 |
0 |
elsif (ref $v eq 'Functional::Types') { } |
|
910
|
0 |
0 |
if (ref $$tv{'Val'} eq 'ARRAY') { } |
|
970
|
0 |
0 |
if (@_) { } |
|
972
|
0 |
0 |
if (istypedval($v)) |
|
996
|
0 |
0 |
$_[0] =~ /^[a-z_]/u ? : |
|
1001
|
0 |
0 |
$kind eq '~' ? : |
|
1011
|
0 |
0 |
if (defined $v) { } |
|
1023
|
0 |
0 |
if $VV |
|
1024
|
0 |
0 |
if $VV |
|
1045
|
0 |
0 |
if $VV |
|
1047
|
0 |
0 |
if (@c) |
|
1058
|
0 |
0 |
if $FIXME |
|
|
0 |
0 |
if (defined $v) { } |
|
1059
|
0 |
0 |
if (ref $v eq 'Functional::Types') { } |
|
1060
|
0 |
0 |
if (typecheck($$v{'Type'}, $$a{'Type'})) { } |
|
1066
|
0 |
0 |
if $FIXME |
|
1078
|
0 |
0 |
if $VV |
|
1093
|
0 |
0 |
if ($$v{'Type'} ~~ $$a{'Type'}[2]) { } |
|
1133
|
0 |
0 |
if (@c) |
|
1150
|
0 |
0 |
if (defined $v) { } |
|
1151
|
0 |
0 |
if $FIXME |
|
1159
|
0 |
0 |
if (istypedval($k)) |
|
1191
|
0 |
0 |
if (@c) |
|
1220
|
0 |
0 |
if (@_) { } |
|
1221
|
0 |
0 |
$_[0] ? : |