skip an alarm using test if the perl signal detection is broken

Like 5.6.2 in my Ubuntu 32-bit VM

diff --git a/t/250-draw/100-fill.t b/t/250-draw/100-fill.t
index c809f12780d8bd55c93fcf9c64f89f3e4a12c676..e1b851ffd5fef856f407866eca519e5910bc8152 100644 (file)
--- a/t/250-draw/100-fill.t
+++ b/t/250-draw/100-fill.t
@@ -361,6 +361,7 @@ ok($oocopy->errstr =~ /Unknown hatch type/,
 SKIP:
 {
   skip("can't test without alarm()", 1) unless $Config{d_alarm};
+  skip("Your signals are misconfigured", 1) unless exists $SIG{ALRM};
   local $SIG{ALRM} = sub { die; };
 
   eval {