1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 0341f6e9d6..abe3e60803 100644
--- a/mg.c
+++ b/mg.c
@@ -2988,7 +2988,7 @@ Perl_sighandler(int sig)
 	(void)rsignal(sig, PL_csighandlerp);
 #endif
 #endif /* !PERL_MICRO */
-	Perl_die(aTHX_ NULL);
+	die_sv(ERRSV);
     }
 cleanup:
     if (flags & 1)