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 */
PERLVAR(Isortstash, HV *) /* which is in some package or other */
PERLVAR(Ifirstgv, GV *) /* $a */
PERLVAR(Isecondgv, GV *) /* $b */
-PERLVAR(Isortstack, AV *) /* temp stack during pp_sort() */
-PERLVAR(Isignalstack, AV *) /* temp stack during sighandler() */
PERLVAR(Imystrk, SV *) /* temp key string for do_each() */
PERLVAR(Idumplvl, I32) /* indentation level on syntax tree dump */
PERLVAR(Ioldlastpm, PMOP *) /* for saving regexp context during debugger */
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
+
#ifdef USE_THREADS
PERLVAR(Ithrsv, SV *) /* holds struct perl_thread for main thread */
+PERLVARI(Ithreadnum, U32, 0) /* incremented each thread creation */
#endif /* USE_THREADS */