PERLVARI(Imaxsysfd, I32, MAXSYSFD)
/* top fd to pass to subprocesses */
-PERLVAR(Imultiline, int) /* $*--do strings hold >1 line? */
PERLVAR(Istatusvalue, I32) /* $? */
PERLVAR(Iexit_flags, U8) /* was exit() unexpected, etc. */
#ifdef VMS
#ifdef PERL_MAD
PERLVARA(Inexttoke,5, NEXTTOKE) /* value of next token, if any */
PERLVAR(Ilasttoke, I32)
+PERLVAR(Irealtokenstart,I32)
+PERLVAR(Ifaketokens, I32)
+PERLVAR(Ithismad, MADPROP *)
+PERLVAR(Ithistoken, SV *)
+PERLVAR(Ithisopen, SV *)
+PERLVAR(Ithisstuff, SV *)
+PERLVAR(Ithisclose, SV *)
+PERLVAR(Ithiswhite, SV *)
+PERLVAR(Inextwhite, SV *)
+PERLVAR(Iskipwhite, SV *)
+PERLVAR(Iendwhite, SV *)
+PERLVAR(Icurforce, I32)
#else
PERLVARA(Inextval,5, YYSTYPE) /* value of next token, if any */
PERLVARA(Inexttype,5, I32) /* type of next token */
PERLVAR(Imemory_debug_header, struct perl_memory_debug_header)
#endif
+#ifdef PERL_UTF8_CACHE_ASSERT
+PERLVARI(Iutf8cache, I8, -1) /* Is the utf8 caching code enabled? */
+#else
+PERLVARI(Iutf8cache, I8, 1) /* Is the utf8 caching code enabled? */
+#endif
+
/* New variables must be added to the very end, before this comment,
* for binary compatibility (the offsets of the old members must not change).
* (Don't forget to add your variable also to perl_clone()!)