Branch Coverage

blib/lib/PDL/PP/Signature.pm
Criterion Covered Total %
branch 51 66 77.2


line true false branch
28 0 128 if defined $argorder and not $argorder
49 11 115 if (not $argorder and keys %$otherdefaults != (my(@other_args) = @{$sig->{'OtherNames'};}))
54 2 12 if exists $otherdefaults->{$_}
56 1 13 if $default_seen and not exists $otherdefaults->{$_}
59 6 119 if ($argorder and ref $argorder)
63 1 5 if keys %namehash
66 1 4 if keys %orderhash
70 5 12 if exists $optionals{$_}
72 1 11 if $optional and not exists $optionals{$_}
83 2 35 if (s/^\s*$PDL::PP::PdlParObj::sqbr_re\s*//)
85 0 2 if $lflags{'o'} and $lflags{'io'}
87 0 2 if keys %lflags
90 2 35 if (/^\s*([^=]+?)\s*=>\s*(\S+)\s*$/) { }
93 0 2 if $main::PP_VERBOSE
101 1 36 if $PDL::PP::PdlParObj::INVALID_PAR{$name}
104 0 36 if $type->is_array
147 229 26 if $omit_count and $omit_count > 0 and not keys %$except and $with_xs
148 0 508 if $omit_count and $omit_count < 0
151 0 81 $objs->{$_}->is_array ? :
482 26 unless $omit_count
152 482 26 unless $with_xs
160 360 0 unless $has_count
161 0 0 if $_[0]{'OtherFlags'}{$without_count}
163 140 0 unless &other_is_out
172 0 199 $omit_count && $omit_count < 0 ? :
182 26 26 $indirect ? :
207 63 8 unless $argorder
208 4 4 if ref $argorder
225 0 10 unless defined $this->{'Create'}
235 0 12 unless $#_ >= $n - 1
237 0 12 if ($PDL::debug)
245 8 19 if $creating[$i++]
253 26 1 unless $corr->$#* > -1