diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-10-03 11:21:59 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-10-03 11:21:59 +0000 |
| commit | 80626cf17d219cfbdd1f416438a98b310b6f2e0b (patch) | |
| tree | d21dae0004b93abb652185f859b1403ab7eb4aac /mg.c | |
| parent | b6455c53c26be8a62e12a3f2a24a3a5086dd2c7b (diff) | |
| download | perl-80626cf17d219cfbdd1f416438a98b310b6f2e0b.tar.gz | |
Adapt definition of Sighandler_t to go with change #32012
p4raw-link: @32012 on //depot/perl: b6455c53c26be8a62e12a3f2a24a3a5086dd2c7b
p4raw-id: //depot/perl@32013
Diffstat (limited to 'mg.c')
| -rw-r--r-- | mg.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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); } } |