Author: cholet Date: Wed Jan 5 15:52:18 2005 New Revision: 124320 URL: http://svn.apache.org/viewcvs?view=rev&rev=124320 Log: skip unsafe SIGALRM test on darwin Modified: perl/modperl/trunk/t/response/TestPerl/signals.pm
Modified: perl/modperl/trunk/t/response/TestPerl/signals.pm Url: http://svn.apache.org/viewcvs/perl/modperl/trunk/t/response/TestPerl/signals.pm?view=diff&rev=124320&p1=perl/modperl/trunk/t/response/TestPerl/signals.pm&r1=124319&p2=perl/modperl/trunk/t/response/TestPerl/signals.pm&r2=124320 ============================================================================== --- perl/modperl/trunk/t/response/TestPerl/signals.pm (original) +++ perl/modperl/trunk/t/response/TestPerl/signals.pm Wed Jan 5 15:52:18 2005 @@ -32,6 +32,10 @@ # doesn't work under static prefork if (!$static) { + if ($^O eq 'darwin') { + skip "ALRM can't be used on darwin", 0; + } + else { local $ENV{PERL_SIGNALS} = "unsafe"; eval { @@ -41,6 +45,7 @@ alarm 0; }; ok t_cmp $@, qr/alarm/, "SIGALRM / unsafe %SIG"; + } } # POSIX::sigaction doesn't work under 5.6.x