summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
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: