Branch Coverage

blib/lib/PDL/Graphics/Simple/Prima.pm
Criterion Covered Total %
branch 3 122 2.4


line true false branch
40 1 0 unless defined $force
42 0 1 unless $force or not defined $PDL::Graphics::Simple::Prima::mod->{'ok'}
48 1 0 if ($@)
53 0 0 if ($PDL::Graphics::Prima::VERSION < $min_version)
59 0 0 if ($@)
69 0 0 if ($@)
85 0 0 if ($@)
121 0 0 unless defined $opt_in
123 0 0 unless (check())
124 0 0 unless check(1)
133 0 0 if $PDL::Graphics::Prima::Simple::N_windows == 0
136 0 0 unless defined $pw
138 0 0 if ($opt_in->{'type'} =~ /^f/i)
153 0 0 if ($me->{'type'} =~ /f/i)
156 0 0 if ($me->{'multi'}) { }
161 0 0 if ($me->{'widgets'}[0]) { }
163 0 0 if ($@)
177 0 0 if (@{$me->{'widgets'};} < 1) { }
187 0 0 if ($me->{'output'} =~ s/(\.\w{2,4})$//) { }
203 0 0 if ($widget_dex < @{$me->{'widgets'};}) { }
205 0 0 if $@
214 0 0 if (not defined $imrow) { }
221 0 0 if (not defined $im) { }
227 0 0 if ($@) { }
252 0 0 $min == $max ? :
289 0 0 if $pi->at(0) < 0
308 0 0 $data->[0]->dim(0) == 1 ? :
312 0 0 $data->[1]->dim(1) == 1 ? :
318 0 0 if ($imdata->ndims > 2) { }
319 0 0 if $imdata->dim(0) != 3
323 0 0 defined $crange ? :
331 0 0 $ipo->{'wedge'} ? :
333 0 0 if $ipo->{'wedge'}
341 0 0 unless (defined $cstash)
360 0 0 if ($labels[$i] =~ s/^([\<\|\> ])//)
362 0 0 if ($ch =~ /[\|\>]/)
364 0 0 if $ch eq "|"
422 0 0 if (defined $ipo->{'legend'})
428 0 0 if ($ipo->{'oplot'} and defined $me->{'last_plot'}) { }
433 0 0 if ($me->{'multi'}) { }
437 0 0 if ($me->{'next_plotno'} and $me->{'next_plotno'} >= $me->{'multi'}[0] * $me->{'multi'}[1])
470 0 0 if ($co->{'with'} eq "fits")
477 0 0 unless ($ipo->{'oplot'})
481 0 0 if defined $ipo->{'title'}
482 0 0 if defined $ipo->{'xlabel'}
483 0 0 if defined $ipo->{'ylabel'}
485 0 0 if $ipo->{'logaxis'} =~ /x/i
486 0 0 if $ipo->{'logaxis'} =~ /y/i
488 0 0 if defined $ipo->{'xrange'} and defined $ipo->{'xrange'}[0]
489 0 0 if defined $ipo->{'xrange'} and defined $ipo->{'xrange'}[1]
490 0 0 if defined $ipo->{'yrange'} and defined $ipo->{'yrange'}[0]
491 0 0 if defined $ipo->{'yrange'} and defined $ipo->{'yrange'}[1]
497 0 0 if ($ipo->{'justify'})
511 0 0 if ($ratio > 1) { }
0 0 elsif ($ratio < 1) { }
537 0 0 if (defined $co->{'style'}) { }
551 0 0 unless defined $type
553 0 0 if (ref $type eq 'CODE') { }
556 0 0 ref $type eq 'ARRAY' ? :
561 0 0 if (not $me->{'type'} =~ /f/i) { }
578 0 0 unless $@ =~ /^done with event loop/