blib/lib/Job/Async/Worker/Memory.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 1 | 3 | 33.3 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
40 | 0 | 2 | 0 | $self->{'active'} ||= &repeat(sub { my $loop = $self->loop; my $f = $loop->new_future; $self->loop->later(sub { if (my $job = shift @Job::Async::Memory::PENDING_JOBS) { $self->process($job); }; $f->done; } ); $f; } , 'while', sub { 0 + @Job::Async::Memory::PENDING_JOBS; } )->on_ready(sub { delete $self->{'active'}; } ) |