diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-18 09:40:58 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-05-18 09:40:58 +0000 |
| commit | 3666098248b43282bda1153dae2f4c1e4af38d09 (patch) | |
| tree | 9c69a323f89cdd81b231dc630b0eaf134225da7a /intrpvar.h | |
| parent | 9e6b2b00f0190751b970ece3db7033405cb08ca5 (diff) | |
| parent | d2719217c9b7910115cef7ea0c16d68e6b286cf7 (diff) | |
| download | perl-3666098248b43282bda1153dae2f4c1e4af38d09.tar.gz | |
[asperl] integrate mainline changes (untested)
p4raw-id: //depot/asperl@1010
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 12 |
1 files changed, 10 insertions, 2 deletions
diff --git a/intrpvar.h b/intrpvar.h index ad9bb81bf3..03435ac07b 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -31,8 +31,7 @@ PERLVAR(Isawstudy, bool) /* do fbm_instr on all strings */ PERLVAR(Isawvec, bool) PERLVAR(Iunsafe, bool) PERLVAR(Iinplace, char *) -PERLVAR(Ie_tmpname, char *) -PERLVAR(Ie_fp, PerlIO *) +PERLVAR(Ie_script, SV *) PERLVAR(Iperldb, U32) /* This value may be raised by extensions for testing purposes */ @@ -152,6 +151,15 @@ PERLVAR(Iors, char *) /* $\ */ PERLVAR(Iorslen, STRLEN) PERLVAR(Iofmt, char *) /* $# */ +/* interpreter atexit processing */ +PERLVARI(Iexitlist, PerlExitListEntry *, NULL) /* list of exit functions */ +PERLVARI(Iexitlistlen, I32, 0) /* length of same */ +PERLVAR(Imodglobal, HV *) /* per-interp module data */ + +#ifdef HAVE_INTERP_INTERN +PERLVAR(Isys_intern, struct interp_intern) /* platform internals */ +#endif + /* more statics moved here */ PERLVAR(Imh, HE) /* from hv.c */ PERLVAR(Imodcount, I32) /* from op.c */ |