From 80626cf17d219cfbdd1f416438a98b310b6f2e0b Mon Sep 17 00:00:00 2001 From: Rafael Garcia-Suarez Date: Wed, 3 Oct 2007 11:21:59 +0000 Subject: [PATCH] Adapt definition of Sighandler_t to go with change #32012 p4raw-link: @32012 on //depot/perl: b6455c53c26be8a62e12a3f2a24a3a5086dd2c7b p4raw-id: //depot/perl@32013 --- iperlsys.h | 2 +- mg.c | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/iperlsys.h b/iperlsys.h index bc99954..f3aa64d 100644 --- a/iperlsys.h +++ b/iperlsys.h @@ -52,7 +52,7 @@ #ifndef Sighandler_t # if defined(HAS_SIGACTION) && defined(SA_SIGINFO) -typedef Signal_t (*Sighandler_t) (int, ...); +typedef Signal_t (*Sighandler_t) (int, siginfo_t*, void*); # else typedef Signal_t (*Sighandler_t) (int); # endif diff --git a/mg.c b/mg.c index e97b8dd..2084cac 100644 --- a/mg.c +++ b/mg.c @@ -1346,7 +1346,7 @@ Perl_csighandler(int sig) (PL_signals & PERL_SIGNALS_UNSAFE_FLAG)) /* Call the perl level handler now-- * with risk we may be in malloc() etc. */ - (*PL_sighandlerp)(sig); + (*PL_sighandlerp)(sig, NULL, NULL); else S_raise_signal(aTHX_ sig); #if defined(HAS_SIGACTION) && defined(SA_SIGINFO) @@ -1385,7 +1385,7 @@ Perl_despatch_signals(pTHX) PERL_BLOCKSIG_ADD(set, sig); PL_psig_pend[sig] = 0; PERL_BLOCKSIG_BLOCK(set); - (*PL_sighandlerp)(sig); + (*PL_sighandlerp)(sig, NULL, NULL); PERL_BLOCKSIG_UNBLOCK(set); } } -- 2.7.4