Merge remote branch 'zefram/zefram/reliable_exception' into blead

Conflicts:
	pp_ctl.c

1 files changed, 1 insertions, 1 deletions

diff --git a/mg.c b/mg.c
index 3c5702669f..4be1b3c2e1 100644
--- a/mg.c
+++ b/mg.c
@@ -3004,7 +3004,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)