summaryrefslogtreecommitdiff
path: root/perlvars.h
diff options
context:
space:
mode:
authorChip Salzenberg <chip@pobox.com>2003-07-10 09:13:20 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2003-07-10 17:33:53 +0000
commitb35112e751727d4207068fd54bf0c9d77ad0ba97 (patch)
treea7c3178c72e3442ae7dd539f8e3b913dbd62c938 /perlvars.h
parent669f94828c50674b20ed995418707226081e2671 (diff)
downloadperl-b35112e751727d4207068fd54bf0c9d77ad0ba97.tar.gz
Restore SIGFPE on exec()
Message-ID: <20030710171319.GA21588@perlsupport.com> p4raw-id: //depot/perl@20117
Diffstat (limited to 'perlvars.h')
-rw-r--r--perlvars.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/perlvars.h b/perlvars.h
index abd2f3eb30..081139969d 100644
--- a/perlvars.h
+++ b/perlvars.h
@@ -55,3 +55,7 @@ PERLVAR(Gdollarzero_mutex, perl_mutex) /* Modifying $0 */
/* This is constant on most architectures, a global on OS/2 */
PERLVARI(Gsh_path, char *, SH_PATH)/* full path of shell */
+/* If Perl has to ignore SIGPFE, this is its saved state.
+ * See perl.h macros PERL_FPU_INIT and PERL_FPU_{PRE,POST}_EXEC. */
+PERLVAR(Gsigfpe_saved, Sighandler_t)
+