X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/b35112e751727d4207068fd54bf0c9d77ad0ba97..8926f2692a3d9503b59a973004dd4d70385b09a0:/perlvars.h diff --git a/perlvars.h b/perlvars.h index 0811399..9cc8a2f 100644 --- a/perlvars.h +++ b/perlvars.h @@ -55,7 +55,17 @@ 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 */ +#ifndef PERL_MICRO /* 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) +#endif + +/* Restricted hashes placeholder value. + * The contents are never used, only the address. */ +PERLVAR(Gsv_placeholder, SV) + +#ifndef PERL_MICRO +PERLVARI(Gcsighandlerp, Sighandler_t, &Perl_csighandler) /* Pointer to C-level sighandler */ +#endif