Branch Coverage

blib/lib/PDL/Func.pm
Criterion Covered Total %
branch 28 116 24.1


line true false branch
168 1 0 $@ ? :
237 1 0 unless exists $opt{'Interpolate'}
262 0 1 unless defined $attr{$interpolate}
267 0 1 if $interpolate eq 'Interpolate' and $modules{'slatec'} == 0
286 7 0 if exists $self->{'types'}{$type}
296 0 0 unless (defined $self->{'attributes'}{$attr})
304 0 0 if $type eq 'default'
306 0 0 if exists $self->{'types'}{$type}
310 0 0 exists $ref->{$attr}{'default'} ? :
323 0 1 unless $self->{'flags'}{'changed'}
327 2 1 if ($self->{'attributes'}{$name}{'required'})
328 0 2 unless defined $self->{'values'}{$name}
331 0 1 unless $#emsg == -1
356 0 1 if ($iflag eq 'Hermite')
381 0 0 unless $xdim == $ydim
385 0 0 if (ref $bc eq 'HASH') { }
0 0 elsif ($bc eq 'simple') { }
393 0 0 if ($#$start == 1)
394 0 0 if ($#$end == 1)
398 0 0 if $modules{'slatec'} == 0
406 0 0 if $modules{'slatec'} == 0
419 0 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->any < 0) { }
449 1 0 if (exists $self->{'values'}{$attr})
467 2 0 if (exists $self->{'values'}{$name}) { }
474 1 0 wantarray ? :
498 0 1 if $#_ == -1
501 0 1 if ($#_ == 0 and ref $_[0] eq 'HASH') { }
512 1 0 if exists $vref->{'Interpolate'}
516 1 2 if $name eq 'Interpolate'
517 2 0 if (exists $self->{'attributes'}{$name}{'settable'})
523 1 0 if $ctr
555 1 0 if (exists $self->{'attributes'}{$name}{'gettable'}) { }
562 0 1 wantarray ? :
666 0 0 unless ref $self
671 0 0 if $hashref->{'settable'}
672 0 0 if $hashref->{'gettable'}
673 0 0 if $hashref->{'required'}
705 0 1 unless defined $xi
716 1 0 if ($iflag eq 'Linear') { }
0 0 elsif ($iflag eq 'Hermite') { }
729 1 0 $err->any ? :
746 0 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->all > 0) { }
779 0 1 unless defined $xi
782 1 0 unless $self->scheme eq 'Hermite'
795 0 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->all > 0) { }
807 0 0 wantarray ? :
852 0 0 unless $#_ == 1
856 0 0 unless $self->{'flags'}{'scheme'} eq 'Hermite'
866 0 0 unless $type eq 'x' or $type eq 'index'
870 0 0 unless $fdim == 2
879 0 0 if ($type eq 'x') { }
883 0 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->any < 0) { }
898 0 0 if ($ierr->all == 0) { }
0 0 elsif ($ierr->all != -4) { }