This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
No sip without SA_SIGINFO. Broken in c22d665.
authorCraig A. Berry <craigberry@mac.com>
Fri, 18 Feb 2011 01:01:04 +0000 (19:01 -0600)
committerCraig A. Berry <craigberry@mac.com>
Fri, 18 Feb 2011 01:01:04 +0000 (19:01 -0600)
mg.c

diff --git a/mg.c b/mg.c
index 5b6b339..6f82001 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -3112,7 +3112,7 @@ Perl_sighandler(int sig)
         * blocked by the system when we entered.
         */
 #ifdef HAS_SIGPROCMASK
-#ifdef HAS_SIGACTION
+#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
        if (sip)
 #endif
        {