diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-12 11:51:25 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-08-12 11:51:25 +0000 |
| commit | 2f42fcb0c2cd8c2699589848aee7b8ee07b30c4f (patch) | |
| tree | ada8ea9f2ed4be699d066737eab622e87b4ba42c /perlvars.h | |
| parent | a25ef67de93be431e21193a0e7ed5fca8bc883f7 (diff) | |
| download | perl-2f42fcb0c2cd8c2699589848aee7b8ee07b30c4f.tar.gz | |
Apply much of Ilya's microperl patch, but instead of
implementing the opendir()/readdir()/closedir() using
external commands give up "ANSI-pureness" and define them
in uconfig.sh, also define other stuff like rename() and putenv().
Leave out the $| emulation in my_fork() since we are
not supposed to have fork() under microperl.
p4raw-id: //depot/perl@20646
Diffstat (limited to 'perlvars.h')
| -rw-r--r-- | perlvars.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/perlvars.h b/perlvars.h index e0f6530d66..9cc8a2f57e 100644 --- a/perlvars.h +++ b/perlvars.h @@ -55,13 +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 |