Branch Coverage

blib/lib/Acme/Parataxis.pm
Criterion Covered Total %
branch 48 96 50.0


line true false branch
55 0 15 if ($^O eq "MSWin32")
66 0 15 $^O eq 'MSWin32' ? :
76 0 180 if ref $inc
80 15 30 if (-e $path)
82 15 0 if $lib
85 0 15 unless $lib
100 0 0 if (builtin::blessed($thing))
101 0 0 if $thing->can("await")
102 0 0 if $thing->can("wait")
109 47 17 if (not defined $invocant or (ref $invocant || $invocant) ne "Acme::Parataxis" and not eval { do { $invocant->isa("Acme::Parataxis") } })
110 47 0 if defined $invocant
114 0 62 unless defined $result
115 0 62 wantarray ? :
62 0 ref $result eq 'ARRAY' ? :
120 0 28 if (ref $class eq "CODE")
132 0 3 if (not defined $invocant or (ref $invocant || $invocant) ne "Acme::Parataxis" and not eval { do { $invocant->isa("Acme::Parataxis") } })
133 0 0 if defined $invocant
136 0 3 if submit_c_job(0, $ms, 0) < 0
142 0 0 if (not defined $invocant or (ref $invocant || $invocant) ne "Acme::Parataxis" and not eval { do { $invocant->isa("Acme::Parataxis") } })
143 0 0 if defined $invocant
145 0 0 if submit_c_job(1, 0, 0) < 0
151 0 32 if (not defined $invocant or (ref $invocant || $invocant) ne "Acme::Parataxis" and not eval { do { $invocant->isa("Acme::Parataxis") } })
152 0 0 if defined $invocant
157 0 32 unless defined $fileno
158 0 32 $^O eq 'MSWin32' ? :
159 0 32 if submit_c_job(2, $handle, $timeout) < 0
165 0 12 if (not defined $invocant or (ref $invocant || $invocant) ne "Acme::Parataxis" and not eval { do { $invocant->isa("Acme::Parataxis") } })
166 0 0 if defined $invocant
171 0 12 unless defined $fileno
172 0 12 $^O eq 'MSWin32' ? :
173 0 12 if submit_c_job(3, $handle, $timeout) < 0
179 0 20 if (not defined $invocant or (ref $invocant || $invocant) ne "Acme::Parataxis" and not eval { do { $invocant->isa("Acme::Parataxis") } })
180 0 0 if defined $invocant
183 16 2 unless defined $result
184 0 2 wantarray ? :
193 11 0 if (my $fiber = "Acme::Parataxis"->by_id($fid))
202 1620 45 if $job_idx == -1
221 45 0 if ($fiber)
223 25 20 if (defined $fiber and not $fiber->is_done)
224 25 0 if (defined $yield_val and $yield_val eq 'WAITING') { }
231 50 1570 if (@SCHEDULER_QUEUE)
233 0 50 unless $current
234 0 50 if $current->is_done
236 34 16 if (defined $current and not $current->is_done)
237 33 1 if (defined $res and $res eq 'WAITING') { }
244 8 2 if (defined $main_fiber and $main_fiber->is_done and $active_count == 0 and not @SCHEDULER_QUEUE)
247 1559 51 if ($IS_RUNNING and not @SCHEDULER_QUEUE and not @ready)
397 15 0 unless ${^GLOBAL_PHASE} eq "DESTRUCT"