Branch Coverage

blib/lib/PDL/Func.pm
Criterion Covered Total %
branch 59 126 46.8


line true false branch
249 1 2 unless exists $opt{'Interpolate'}
273 0 4 unless defined $attr{$interpolate}
292 28 0 if exists $self->{'types'}{$type}
302 8 0 unless (defined $self->{'attributes'}{$attr})
310 3 14 if $type eq "default"
312 14 0 if exists $self->{'types'}{$type}
316 3 5 exists $ref->{$attr}{'default'} ? :
329 0 7 unless $self->{'flags'}{'changed'}
333 20 15 if ($self->{'attributes'}{$name}{'required'})
334 0 20 unless defined $self->{'values'}{$name}
337 0 7 if @emsg
361 5 2 if ($iflag eq "Hermite")
364 1 6 if ($iflag eq "CSpline")
388 0 5 unless $xdim == $ydim
392 1 4 if (ref $bc eq 'HASH') { }
4 0 elsif ($bc eq 'simple') { }
398 0 1 @$start == 2 ? :
0 1 @$end == 2 ? :
416 5 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->any < 0) { }
438 0 1 unless $xdim == $ydim
441 1 0 if (ref $bc eq "HASH")
445 0 1 @$start == 2 ? :
0 1 @$end == 2 ? :
450 1 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->any < 0) { }
474 19 0 if (exists $self->{'values'}{$attr})
491 38 0 if (exists $self->{'values'}{$name}) { }
498 13 5 wantarray ? :
522 0 6 unless @_
525 0 6 if (@_ == 1 and ref $_[0] eq 'HASH') { }
536 4 2 if exists $vref->{'Interpolate'}
540 4 11 if $name eq "Interpolate"
541 11 0 if (exists $self->{'attributes'}{$name}{'settable'})
547 6 0 if $ctr
579 2 0 if (exists $self->{'attributes'}{$name}{'gettable'}) { }
586 1 1 wantarray ? :
690 0 0 unless ref $self
695 0 0 if $hashref->{'settable'}
696 0 0 if $hashref->{'gettable'}
697 0 0 if $hashref->{'required'}
729 0 6 unless defined $xi
740 1 5 if ($iflag eq 'Linear') { }
5 0 elsif ($iflag eq 'Hermite' or $iflag eq 'CSpline') { }
753 1 0 $err->any ? :
767 5 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->all > 0) { }
799 0 2 unless defined $xi
802 1 1 if $self->scheme eq "Linear"
815 1 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->all > 0) { }
827 0 1 wantarray ? :
872 0 0 unless @_ == 2
876 0 0 unless $self->{'flags'}{'scheme'} eq "Hermite"
886 0 0 unless $type eq "x" or $type eq "index"
890 0 0 unless $fdim == 2
899 0 0 if ($type eq 'x') { }
903 0 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->any < 0) { }
918 0 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->all != -4) { }
955 0 1 if $obj->status != 1
976 0 1 if $obj->status != 1