CPAN::Groonga

LEH','client result ok 2';

            isnt $slot->worker_pid, $cpid,'worker respawned';
            $cv->send;
        });
    }
});

my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
$s

 },
    );
    push(@tasks, $res);
}
    
$cv->end;
    
DEBUG 'waiting...';
my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
undef($tt);
$slotman->stop;
undef($slotman);

gstop();

done_

 shift;
    is $res,'OLLEH','client result ok slow';
    
    $cv->end;
});


$cv->end;

my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
undef($t);
undef($c);
gstop();


done_testing();

mer 5,0,sub{ 
#    $slot->stop();
#    is $slot->is_stopped, 1;
    $cv->send;
};

my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
undef($tt);
undef($slotman);
gstop();

done_testing();

5,0,sub{ 
    $slot->stop();
    is $slot->is_stopped, 1;
    $cv->send;
};

my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
undef($t);
undef($tt);
undef($slot);
gstop();

done_testing()