summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-01-30 19:41:41 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-01-30 19:41:41 +0000
commit1d61552279452016689faf899b5e1f418a500278 (patch)
tree438859e5f8bbb384d61e8738bb2534adf4975585 /mg.c
parent746380c873d0626f12eeb18479b90569181310dc (diff)
downloadperl-1d61552279452016689faf899b5e1f418a500278.tar.gz
Microperl sync.
p4raw-id: //depot/perl@8622
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/mg.c b/mg.c
index 81653021f8..bb9509ac64 100644
--- a/mg.c
+++ b/mg.c
@@ -2264,6 +2264,7 @@ Perl_sighandler(int sig)
POPSTACK;
if (SvTRUE(ERRSV)) {
+#ifndef PERL_MICRO
#ifdef HAS_SIGPROCMASK
/* Handler "died", for example to get out of a restart-able read().
* Before we re-do that on its behalf re-enable the signal which was
@@ -2278,6 +2279,7 @@ Perl_sighandler(int sig)
(void)rsignal(sig, SIG_IGN);
(void)rsignal(sig, &Perl_csighandler);
#endif
+#endif /* !PERL_MICRO */
Perl_die(aTHX_ Nullch);
}
cleanup: