Branch Coverage

blib/lib/Math/Prime/TiedArray.pm
Criterion Covered Total %
branch 45 88 51.1


line true false branch
99 0 65 if $$self{'_options'}{'debug'} > 2
101 6 59 if ($idx + 1 > $$self{'_cache_size'})
111 0 1 if $$self{'_options'}{'debug'} > 2
123 0 29 if $$self{'_options'}{'debug'} > 2
131 0 6 if $$self{'_options'}{'debug'} > 2
133 0 6 if $count <= $$self{'_cache_size'}
143 1 70 if $new_limit < 55
153 0 5 if $$self{'_options'}{'debug'} > 2
155 0 5 if ($$self{'_options'}{'cache'})
156 0 0 unless untie $$self{'_cache'}
168 2 1 if ($key eq 'precompute') { }
0 1 elsif ($key eq 'cache') { }
0 1 elsif ($key eq 'debug') { }
0 1 elsif ($key eq 'extend_step') { }
1 0 elsif ($key eq 'extend_ceiling') { }
169 0 2 unless $value =~ /^\d+$/ and $value > 0
174 0 0 if -e $value and not -w $value
177 0 0 if $value =~ /\D/
180 0 0 if $value =~ /\D/
183 0 1 if $value =~ /\D/
200 0 5 if ($$self{'_options'}{'cache'}) { }
205 0 0 unless tie @cache, 'DB_File', $$self{'_options'}{'cache'}, &DB_File::O_CREAT | &DB_File::O_RDWR, 420, $DB_File::DB_RECNO
211 0 0 unless ($$self{'_cache'} and ref $$self{'_cache'} eq 'ARRAY' and defined $$self{'_cache'}[1] and $$self{'_cache'}[1] == 2 and defined $$self{'_cache'}[2] and $$self{'_cache'}[2] == 3)
222 0 0 unless tie @cache, 'DB_File', $$self{'_options'}{'cache'}, &DB_File::O_CREAT | &DB_File::O_RDWR, 420, $DB_File::DB_RECNO
249 1 4 if ($$self{'_options'}{'extend_ceiling'} and $$self{'_options'}{'extend_ceiling'} < 7500)
255 4 1 if ($$self{'_options'}{'precompute'} and $$self{'_options'}{'precompute'} > $$self{'_max_prime'})
269 0 75 if $$self{'_options'}{'debug'} > 1
272 58 17 if $limit <= $$self{'_limit'}
274 0 17 if $$self{'_options'}{'extend_ceiling'} and $limit > $$self{'_options'}{'extend_ceiling'}
285 0 1484 if ($$self{'_options'}{'debug'} > 0)
287 0 0 if ($x_p > $progress)
295 0 202072 if $$self{'_options'}{'debug'} > 3
297 5053 72350 if ($n > $$self{'_max_prime'} and $x > $y and $n <= $limit and $n % 12 == 11)
306 6029 140634 if ($n > $$self{'_max_prime'} and $n <= $limit and $n % 12 == 7)
311 13853 17179 if ($n > $$self{'_max_prime'} and $n <= $limit and $n % 12 == 1 || $n % 12 == 5)
322 0 1416 if ($$self{'_options'}{'debug'} > 0)
324 0 0 if ($x_p > $progress)
330 1068 348 unless $$self{'_sieve'}{$n}
331 0 348 if $$self{'_options'}{'debug'} > 3
339 0 348 if $$self{'_options'}{'debug'} > 3
344 0 79797 if ($$self{'_options'}{'debug'} > 0)
346 0 0 if ($x_p > $progress)
352 71545 8252 unless $$self{'_sieve'}{$n}
353 0 8252 if $$self{'_options'}{'debug'} > 2