Branch Coverage

blib/lib/MCE/Loop.pm
Criterion Covered Total %
branch 68 130 52.3


line true false branch
28 0 0 if $INC{'threads.pm'}
48 5 0 unless ($_pkg =~ /^MCE::/)
59 0 0 if $_arg eq "max_workers"
60 0 0 if $_arg eq "chunk_size"
61 0 0 if $_arg eq "tmp_dir"
62 0 0 if $_arg eq "freeze"
63 0 0 if $_arg eq "thaw"
64 0 0 if $_arg eq "init_relay"
65 0 0 if $_arg eq "use_threads"
68 0 0 if ($_arg eq "sereal")
69 0 0 if (shift() eq 0)
84 0 5 unless $_p->{'CHUNK_SIZE'} eq "auto"
97 6 0 if defined $_[0] and $_[0] eq "MCE::Loop"
100 0 6 ref $_[0] eq 'HASH' ? :
109 11 0 if defined $_[0] and $_[0] eq "MCE::Loop"
110 8 3 defined $_[0] ? :
112 5 6 if ($_pkg eq 'MCE') { }
3 3 elsif ($_MCE->{$_pkg} and $_MCE->{$_pkg}{'_init_pid'} eq "$$.$_tid") { }
116 3 0 if $_MCE->{$_pkg}{'_spawned'}
135 0 4 if defined $_[0] and $_[0] eq "MCE::Loop"
140 4 0 if (defined(my $_p = $_params->{$_pid})) { }
141 0 4 if exists $_p->{'input_data'}
142 0 4 if exists $_p->{'sequence'}
148 2 2 if (defined $_file and ref $_file eq '' and $_file ne '') { }
2 0 elsif (ref $_file eq 'SCALAR' or ref($_file) =~ /^(?:GLOB|FileHandle|IO::)/) { }
149 0 2 unless -e $_file
150 0 2 unless -r $_file
151 0 2 unless -f $_file
174 0 2 if defined $_[0] and $_[0] eq "MCE::Loop"
179 2 0 if (defined(my $_p = $_params->{$_pid})) { }
180 0 2 if exists $_p->{'input_data'}
181 0 2 if exists $_p->{'_file'}
189 0 2 if (ref $_[0] eq 'HASH') { }
0 2 elsif (ref $_[0] eq 'ARRAY') { }
2 0 elsif (ref $_[0] eq '' or ref($_[0]) =~ /^Math::/) { }
194 0 0 if (@{$_[0];} > 3 and $_[0][3] =~ /\d$/) { }
204 0 2 if (@_ > 3 and $_[3] =~ /\d$/) { }
217 0 2 unless defined $_begin
219 0 2 unless defined $_end
237 0 14 if defined $_[0] and $_[0] eq "MCE::Loop"
240 6 8 caller() eq 'MCE::Loop' ? :
246 4 10 if (@_ == 1 and $_r =~ /^(?:ARRAY|HASH|SCALAR|CODE|GLOB|FileHandle|IO::)/)
250 14 0 if (defined(my $_p = $_params->{$_pid}))
252 14 0 if exists $_p->{'max_workers'}
254 8 6 if defined $_input_data or scalar @_
255 0 14 if exists $_p->{'user_func'}
256 0 14 if exists $_p->{'user_tasks'}
264 14 0 if (defined(my $_p = $_params->{$_pid}))
265 4 10 if (exists $_p->{'_file'}) { }
268 0 10 if exists $_p->{'input_data'}
276 6 8 if (not defined $_prev_c->{$_pid} or $_prev_c->{$_pid} != $_code)
277 0 6 if defined $_MCE->{$_pid}
285 6 0 if (defined(my $_p = $_params->{$_pid}))
287 0 10 if $_k eq "sequence_run"
288 0 10 if $_k eq "input_data"
289 0 10 if $_k eq "chunk_size"
292 0 10 unless exists $MCE::_valid_fields_new{$_k}
300 0 30 if exists $_def->{$_pkg}{uc $_k} and not exists $_opts{$_k}
308 2 12 if defined $_wa
310 8 6 if (defined $_input_data) { }
4 2 elsif (scalar @_) { }
320 2 0 if (defined $_params->{$_pid} and exists $_params->{$_pid}{'sequence'})
325 2 0 if (exists $_params->{$_pid}{'sequence_run'})
335 1 10 if defined $_wa
337 1 10 defined $_wa ? :