Fix timing issues with test in sigdispatch.t on certain BSDs

Signed-off-by: Chris 'BinGOs' Williams <chris@bingosnet.co.uk>

diff --git a/t/op/sigdispatch.t b/t/op/sigdispatch.t
index 8e861e1..3a0138a 100644 (file)
--- a/t/op/sigdispatch.t
+++ b/t/op/sigdispatch.t
@@ -73,7 +73,7 @@ SKIP: {
 
     # test unsafe signal handlers in combination with exceptions
     my $action = POSIX::SigAction->new(sub { $gotit--, die }, POSIX::SigSet->new, 0);
-    POSIX::sigaction(&POSIX::SIGUSR1, $action);
-    eval { kill SIGUSR1, $$ } for 1..2;
+    POSIX::sigaction(&POSIX::SIGALRM, $action);
+    eval { alarm 1; POSIX::sigsuspend(POSIX::SigSet->new) } for 1..2;
     is $gotit, 0, 'Received both signals';
 }