This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix definition of Perl_sighandler following change 25200
authorSteve Hay <SteveHay@planit.com>
Wed, 20 Jul 2005 13:59:18 +0000 (13:59 +0000)
committerSteve Hay <SteveHay@planit.com>
Wed, 20 Jul 2005 13:59:18 +0000 (13:59 +0000)
p4raw-id: //depot/perl@25203

mg.c

diff --git a/mg.c b/mg.c
index f4f8f60..e9faf1b 100644 (file)
--- a/mg.c
+++ b/mg.c
@@ -2621,7 +2621,11 @@ Perl_whichsig(pTHX_ const char *sig)
 }
 
 Signal_t
 }
 
 Signal_t
+#if defined(HAS_SIGACTION) && defined(SA_SIGINFO)
 Perl_sighandler(int sig, ...)
 Perl_sighandler(int sig, ...)
+#else
+Perl_sighandler(int sig)
+#endif
 {
 #ifdef PERL_GET_SIG_CONTEXT
     dTHXa(PERL_GET_SIG_CONTEXT);
 {
 #ifdef PERL_GET_SIG_CONTEXT
     dTHXa(PERL_GET_SIG_CONTEXT);