is $res,'OLLEH','client result ok';
isnt $slot->worker_pid, $cpid,'worker respawned';
$cv->send;
});
});
my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
$slot->st
$str),"check $n";},
);
}
my $tt = AE::timer 5,0,sub{
$cv->send;
};
my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
undef($tt);
$slotman->stop;
undef($slotman);
gstop();
done_t
'OLLEH','client result ok';
# kill SIGINT,$$;
$cv->send;
});
my $res = $cv->recv;
isnt $res,'timeout','ends successfully';
undef($t);
undef($c);
kill INT => $ww;
gstop();
done_testin
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()