PL_ stuff for threads

p4raw-id: //depot/ansiperl@1534

1 files changed, 678 insertions, 678 deletions

diff --git a/embedvar.h b/embedvar.h
index ae37202410..beec65715a 100644
--- a/embedvar.h
+++ b/embedvar.h
@@ -20,481 +20,481 @@
 #ifndef USE_THREADS
 /* If we do not have threads then per-thread vars are per-interpreter */
 
-#define PL_Sv			(curinterp->TSv)
-#define PL_Xpv			(curinterp->TXpv)
-#define PL_av_fetch_sv		(curinterp->Tav_fetch_sv)
-#define PL_bodytarget		(curinterp->Tbodytarget)
-#define PL_bostr		(curinterp->Tbostr)
-#define PL_chopset		(curinterp->Tchopset)
-#define PL_colors		(curinterp->Tcolors)
-#define PL_colorset		(curinterp->Tcolorset)
-#define PL_curcop		(curinterp->Tcurcop)
-#define PL_curpad		(curinterp->Tcurpad)
-#define PL_curpm		(curinterp->Tcurpm)
-#define PL_curstack		(curinterp->Tcurstack)
-#define PL_curstackinfo		(curinterp->Tcurstackinfo)
-#define PL_curstash		(curinterp->Tcurstash)
-#define PL_defoutgv		(curinterp->Tdefoutgv)
-#define PL_defstash		(curinterp->Tdefstash)
-#define PL_delaymagic		(curinterp->Tdelaymagic)
-#define PL_dirty		(curinterp->Tdirty)
-#define PL_extralen		(curinterp->Textralen)
-#define PL_firstgv		(curinterp->Tfirstgv)
-#define PL_formtarget		(curinterp->Tformtarget)
-#define PL_hv_fetch_ent_mh	(curinterp->Thv_fetch_ent_mh)
-#define PL_hv_fetch_sv		(curinterp->Thv_fetch_sv)
-#define PL_in_eval		(curinterp->Tin_eval)
-#define PL_last_in_gv		(curinterp->Tlast_in_gv)
-#define PL_lastgotoprobe	(curinterp->Tlastgotoprobe)
-#define PL_lastscream		(curinterp->Tlastscream)
-#define PL_localizing		(curinterp->Tlocalizing)
-#define PL_mainstack		(curinterp->Tmainstack)
-#define PL_markstack		(curinterp->Tmarkstack)
-#define PL_markstack_max	(curinterp->Tmarkstack_max)
-#define PL_markstack_ptr	(curinterp->Tmarkstack_ptr)
-#define PL_maxscream		(curinterp->Tmaxscream)
-#define PL_modcount		(curinterp->Tmodcount)
-#define PL_nrs			(curinterp->Tnrs)
-#define PL_ofs			(curinterp->Tofs)
-#define PL_ofslen		(curinterp->Tofslen)
-#define PL_op			(curinterp->Top)
-#define PL_opsave		(curinterp->Topsave)
-#define PL_reg_eval_set		(curinterp->Treg_eval_set)
-#define PL_reg_flags		(curinterp->Treg_flags)
-#define PL_reg_start_tmp	(curinterp->Treg_start_tmp)
-#define PL_reg_start_tmpl	(curinterp->Treg_start_tmpl)
-#define PL_regbol		(curinterp->Tregbol)
-#define PL_regcc		(curinterp->Tregcc)
-#define PL_regcode		(curinterp->Tregcode)
-#define PL_regcomp_parse	(curinterp->Tregcomp_parse)
-#define PL_regcomp_rx		(curinterp->Tregcomp_rx)
-#define PL_regcompp		(curinterp->Tregcompp)
-#define PL_regdata		(curinterp->Tregdata)
-#define PL_regdummy		(curinterp->Tregdummy)
-#define PL_regendp		(curinterp->Tregendp)
-#define PL_regeol		(curinterp->Tregeol)
-#define PL_regexecp		(curinterp->Tregexecp)
-#define PL_regflags		(curinterp->Tregflags)
-#define PL_regindent		(curinterp->Tregindent)
-#define PL_reginput		(curinterp->Treginput)
-#define PL_reginterp_cnt	(curinterp->Treginterp_cnt)
-#define PL_reglastparen		(curinterp->Treglastparen)
-#define PL_regnarrate		(curinterp->Tregnarrate)
-#define PL_regnaughty		(curinterp->Tregnaughty)
-#define PL_regnpar		(curinterp->Tregnpar)
-#define PL_regprecomp		(curinterp->Tregprecomp)
-#define PL_regprev		(curinterp->Tregprev)
-#define PL_regprogram		(curinterp->Tregprogram)
-#define PL_regsawback		(curinterp->Tregsawback)
-#define PL_regseen		(curinterp->Tregseen)
-#define PL_regsize		(curinterp->Tregsize)
-#define PL_regstartp		(curinterp->Tregstartp)
-#define PL_regtill		(curinterp->Tregtill)
-#define PL_regxend		(curinterp->Tregxend)
-#define PL_restartop		(curinterp->Trestartop)
-#define PL_retstack		(curinterp->Tretstack)
-#define PL_retstack_ix		(curinterp->Tretstack_ix)
-#define PL_retstack_max		(curinterp->Tretstack_max)
-#define PL_rs			(curinterp->Trs)
-#define PL_savestack		(curinterp->Tsavestack)
-#define PL_savestack_ix		(curinterp->Tsavestack_ix)
-#define PL_savestack_max	(curinterp->Tsavestack_max)
-#define PL_scopestack		(curinterp->Tscopestack)
-#define PL_scopestack_ix	(curinterp->Tscopestack_ix)
-#define PL_scopestack_max	(curinterp->Tscopestack_max)
-#define PL_screamfirst		(curinterp->Tscreamfirst)
-#define PL_screamnext		(curinterp->Tscreamnext)
-#define PL_secondgv		(curinterp->Tsecondgv)
-#define PL_seen_evals		(curinterp->Tseen_evals)
-#define PL_seen_zerolen		(curinterp->Tseen_zerolen)
-#define PL_sortcop		(curinterp->Tsortcop)
-#define PL_sortcxix		(curinterp->Tsortcxix)
-#define PL_sortstash		(curinterp->Tsortstash)
-#define PL_stack_base		(curinterp->Tstack_base)
-#define PL_stack_max		(curinterp->Tstack_max)
-#define PL_stack_sp		(curinterp->Tstack_sp)
-#define PL_start_env		(curinterp->Tstart_env)
-#define PL_statbuf		(curinterp->Tstatbuf)
-#define PL_statcache		(curinterp->Tstatcache)
-#define PL_statgv		(curinterp->Tstatgv)
-#define PL_statname		(curinterp->Tstatname)
-#define PL_tainted		(curinterp->Ttainted)
-#define PL_timesbuf		(curinterp->Ttimesbuf)
-#define PL_tmps_floor		(curinterp->Ttmps_floor)
-#define PL_tmps_ix		(curinterp->Ttmps_ix)
-#define PL_tmps_max		(curinterp->Ttmps_max)
-#define PL_tmps_stack		(curinterp->Ttmps_stack)
-#define PL_top_env		(curinterp->Ttop_env)
-#define PL_toptarget		(curinterp->Ttoptarget)
+#define PL_Sv			(PL_curinterp->TSv)
+#define PL_Xpv			(PL_curinterp->TXpv)
+#define PL_av_fetch_sv		(PL_curinterp->Tav_fetch_sv)
+#define PL_bodytarget		(PL_curinterp->Tbodytarget)
+#define PL_bostr		(PL_curinterp->Tbostr)
+#define PL_chopset		(PL_curinterp->Tchopset)
+#define PL_colors		(PL_curinterp->Tcolors)
+#define PL_colorset		(PL_curinterp->Tcolorset)
+#define PL_curcop		(PL_curinterp->Tcurcop)
+#define PL_curpad		(PL_curinterp->Tcurpad)
+#define PL_curpm		(PL_curinterp->Tcurpm)
+#define PL_curstack		(PL_curinterp->Tcurstack)
+#define PL_curstackinfo		(PL_curinterp->Tcurstackinfo)
+#define PL_curstash		(PL_curinterp->Tcurstash)
+#define PL_defoutgv		(PL_curinterp->Tdefoutgv)
+#define PL_defstash		(PL_curinterp->Tdefstash)
+#define PL_delaymagic		(PL_curinterp->Tdelaymagic)
+#define PL_dirty		(PL_curinterp->Tdirty)
+#define PL_extralen		(PL_curinterp->Textralen)
+#define PL_firstgv		(PL_curinterp->Tfirstgv)
+#define PL_formtarget		(PL_curinterp->Tformtarget)
+#define PL_hv_fetch_ent_mh	(PL_curinterp->Thv_fetch_ent_mh)
+#define PL_hv_fetch_sv		(PL_curinterp->Thv_fetch_sv)
+#define PL_in_eval		(PL_curinterp->Tin_eval)
+#define PL_last_in_gv		(PL_curinterp->Tlast_in_gv)
+#define PL_lastgotoprobe	(PL_curinterp->Tlastgotoprobe)
+#define PL_lastscream		(PL_curinterp->Tlastscream)
+#define PL_localizing		(PL_curinterp->Tlocalizing)
+#define PL_mainstack		(PL_curinterp->Tmainstack)
+#define PL_markstack		(PL_curinterp->Tmarkstack)
+#define PL_markstack_max	(PL_curinterp->Tmarkstack_max)
+#define PL_markstack_ptr	(PL_curinterp->Tmarkstack_ptr)
+#define PL_maxscream		(PL_curinterp->Tmaxscream)
+#define PL_modcount		(PL_curinterp->Tmodcount)
+#define PL_nrs			(PL_curinterp->Tnrs)
+#define PL_ofs			(PL_curinterp->Tofs)
+#define PL_ofslen		(PL_curinterp->Tofslen)
+#define PL_op			(PL_curinterp->Top)
+#define PL_opsave		(PL_curinterp->Topsave)
+#define PL_reg_eval_set		(PL_curinterp->Treg_eval_set)
+#define PL_reg_flags		(PL_curinterp->Treg_flags)
+#define PL_reg_start_tmp	(PL_curinterp->Treg_start_tmp)
+#define PL_reg_start_tmpl	(PL_curinterp->Treg_start_tmpl)
+#define PL_regbol		(PL_curinterp->Tregbol)
+#define PL_regcc		(PL_curinterp->Tregcc)
+#define PL_regcode		(PL_curinterp->Tregcode)
+#define PL_regcomp_parse	(PL_curinterp->Tregcomp_parse)
+#define PL_regcomp_rx		(PL_curinterp->Tregcomp_rx)
+#define PL_regcompp		(PL_curinterp->Tregcompp)
+#define PL_regdata		(PL_curinterp->Tregdata)
+#define PL_regdummy		(PL_curinterp->Tregdummy)
+#define PL_regendp		(PL_curinterp->Tregendp)
+#define PL_regeol		(PL_curinterp->Tregeol)
+#define PL_regexecp		(PL_curinterp->Tregexecp)
+#define PL_regflags		(PL_curinterp->Tregflags)
+#define PL_regindent		(PL_curinterp->Tregindent)
+#define PL_reginput		(PL_curinterp->Treginput)
+#define PL_reginterp_cnt	(PL_curinterp->Treginterp_cnt)
+#define PL_reglastparen		(PL_curinterp->Treglastparen)
+#define PL_regnarrate		(PL_curinterp->Tregnarrate)
+#define PL_regnaughty		(PL_curinterp->Tregnaughty)
+#define PL_regnpar		(PL_curinterp->Tregnpar)
+#define PL_regprecomp		(PL_curinterp->Tregprecomp)
+#define PL_regprev		(PL_curinterp->Tregprev)
+#define PL_regprogram		(PL_curinterp->Tregprogram)
+#define PL_regsawback		(PL_curinterp->Tregsawback)
+#define PL_regseen		(PL_curinterp->Tregseen)
+#define PL_regsize		(PL_curinterp->Tregsize)
+#define PL_regstartp		(PL_curinterp->Tregstartp)
+#define PL_regtill		(PL_curinterp->Tregtill)
+#define PL_regxend		(PL_curinterp->Tregxend)
+#define PL_restartop		(PL_curinterp->Trestartop)
+#define PL_retstack		(PL_curinterp->Tretstack)
+#define PL_retstack_ix		(PL_curinterp->Tretstack_ix)
+#define PL_retstack_max		(PL_curinterp->Tretstack_max)
+#define PL_rs			(PL_curinterp->Trs)
+#define PL_savestack		(PL_curinterp->Tsavestack)
+#define PL_savestack_ix		(PL_curinterp->Tsavestack_ix)
+#define PL_savestack_max	(PL_curinterp->Tsavestack_max)
+#define PL_scopestack		(PL_curinterp->Tscopestack)
+#define PL_scopestack_ix	(PL_curinterp->Tscopestack_ix)
+#define PL_scopestack_max	(PL_curinterp->Tscopestack_max)
+#define PL_screamfirst		(PL_curinterp->Tscreamfirst)
+#define PL_screamnext		(PL_curinterp->Tscreamnext)
+#define PL_secondgv		(PL_curinterp->Tsecondgv)
+#define PL_seen_evals		(PL_curinterp->Tseen_evals)
+#define PL_seen_zerolen		(PL_curinterp->Tseen_zerolen)
+#define PL_sortcop		(PL_curinterp->Tsortcop)
+#define PL_sortcxix		(PL_curinterp->Tsortcxix)
+#define PL_sortstash		(PL_curinterp->Tsortstash)
+#define PL_stack_base		(PL_curinterp->Tstack_base)
+#define PL_stack_max		(PL_curinterp->Tstack_max)
+#define PL_stack_sp		(PL_curinterp->Tstack_sp)
+#define PL_start_env		(PL_curinterp->Tstart_env)
+#define PL_statbuf		(PL_curinterp->Tstatbuf)
+#define PL_statcache		(PL_curinterp->Tstatcache)
+#define PL_statgv		(PL_curinterp->Tstatgv)
+#define PL_statname		(PL_curinterp->Tstatname)
+#define PL_tainted		(PL_curinterp->Ttainted)
+#define PL_timesbuf		(PL_curinterp->Ttimesbuf)
+#define PL_tmps_floor		(PL_curinterp->Ttmps_floor)
+#define PL_tmps_ix		(PL_curinterp->Ttmps_ix)
+#define PL_tmps_max		(PL_curinterp->Ttmps_max)
+#define PL_tmps_stack		(PL_curinterp->Ttmps_stack)
+#define PL_top_env		(PL_curinterp->Ttop_env)
+#define PL_toptarget		(PL_curinterp->Ttoptarget)
 
 #endif /* !USE_THREADS */
 
 /* These are always per-interpreter if there is more than one */
 
-#define PL_Argv			(curinterp->IArgv)
-#define PL_Cmd			(curinterp->ICmd)
-#define PL_DBcv			(curinterp->IDBcv)
-#define PL_DBgv			(curinterp->IDBgv)
-#define PL_DBline		(curinterp->IDBline)
-#define PL_DBsignal		(curinterp->IDBsignal)
-#define PL_DBsingle		(curinterp->IDBsingle)
-#define PL_DBsub		(curinterp->IDBsub)
-#define PL_DBtrace		(curinterp->IDBtrace)
-#define PL_ampergv		(curinterp->Iampergv)
-#define PL_archpat_auto		(curinterp->Iarchpat_auto)
-#define PL_argvgv		(curinterp->Iargvgv)
-#define PL_argvoutgv		(curinterp->Iargvoutgv)
-#define PL_basetime		(curinterp->Ibasetime)
-#define PL_beginav		(curinterp->Ibeginav)
-#define PL_cddir		(curinterp->Icddir)
-#define PL_compcv		(curinterp->Icompcv)
-#define PL_compiling		(curinterp->Icompiling)
-#define PL_comppad		(curinterp->Icomppad)
-#define PL_comppad_name		(curinterp->Icomppad_name)
-#define PL_comppad_name_fill	(curinterp->Icomppad_name_fill)
-#define PL_comppad_name_floor	(curinterp->Icomppad_name_floor)
-#define PL_copline		(curinterp->Icopline)
-#define PL_curcopdb		(curinterp->Icurcopdb)
-#define PL_curstname		(curinterp->Icurstname)
-#define PL_dbargs		(curinterp->Idbargs)
-#define PL_debdelim		(curinterp->Idebdelim)
-#define PL_debname		(curinterp->Idebname)
-#define PL_debstash		(curinterp->Idebstash)
-#define PL_defgv		(curinterp->Idefgv)
-#define PL_diehook		(curinterp->Idiehook)
-#define PL_dlevel		(curinterp->Idlevel)
-#define PL_dlmax		(curinterp->Idlmax)
-#define PL_doextract		(curinterp->Idoextract)
-#define PL_doswitches		(curinterp->Idoswitches)
-#define PL_dowarn		(curinterp->Idowarn)
-#define PL_dumplvl		(curinterp->Idumplvl)
-#define PL_e_script		(curinterp->Ie_script)
-#define PL_endav		(curinterp->Iendav)
-#define PL_envgv		(curinterp->Ienvgv)
-#define PL_errgv		(curinterp->Ierrgv)
-#define PL_eval_root		(curinterp->Ieval_root)
-#define PL_eval_start		(curinterp->Ieval_start)
-#define PL_exitlist		(curinterp->Iexitlist)
-#define PL_exitlistlen		(curinterp->Iexitlistlen)
-#define PL_fdpid		(curinterp->Ifdpid)
-#define PL_filemode		(curinterp->Ifilemode)
-#define PL_forkprocess		(curinterp->Iforkprocess)
-#define PL_formfeed		(curinterp->Iformfeed)
-#define PL_generation		(curinterp->Igeneration)
-#define PL_gensym		(curinterp->Igensym)
-#define PL_globalstash		(curinterp->Iglobalstash)
-#define PL_hintgv		(curinterp->Ihintgv)
-#define PL_in_clean_all		(curinterp->Iin_clean_all)
-#define PL_in_clean_objs	(curinterp->Iin_clean_objs)
-#define PL_incgv		(curinterp->Iincgv)
-#define PL_initav		(curinterp->Iinitav)
-#define PL_inplace		(curinterp->Iinplace)
-#define PL_last_proto		(curinterp->Ilast_proto)
-#define PL_lastfd		(curinterp->Ilastfd)
-#define PL_lastsize		(curinterp->Ilastsize)
-#define PL_lastspbase		(curinterp->Ilastspbase)
-#define PL_laststatval		(curinterp->Ilaststatval)
-#define PL_laststype		(curinterp->Ilaststype)
-#define PL_leftgv		(curinterp->Ileftgv)
-#define PL_lineary		(curinterp->Ilineary)
-#define PL_linestart		(curinterp->Ilinestart)
-#define PL_localpatches		(curinterp->Ilocalpatches)
-#define PL_main_cv		(curinterp->Imain_cv)
-#define PL_main_root		(curinterp->Imain_root)
-#define PL_main_start		(curinterp->Imain_start)
-#define PL_maxsysfd		(curinterp->Imaxsysfd)
-#define PL_mess_sv		(curinterp->Imess_sv)
-#define PL_minus_F		(curinterp->Iminus_F)
-#define PL_minus_a		(curinterp->Iminus_a)
-#define PL_minus_c		(curinterp->Iminus_c)
-#define PL_minus_l		(curinterp->Iminus_l)
-#define PL_minus_n		(curinterp->Iminus_n)
-#define PL_minus_p		(curinterp->Iminus_p)
-#define PL_modglobal		(curinterp->Imodglobal)
-#define PL_multiline		(curinterp->Imultiline)
-#define PL_mystrk		(curinterp->Imystrk)
-#define PL_ofmt			(curinterp->Iofmt)
-#define PL_oldlastpm		(curinterp->Ioldlastpm)
-#define PL_oldname		(curinterp->Ioldname)
-#define PL_op_mask		(curinterp->Iop_mask)
-#define PL_origargc		(curinterp->Iorigargc)
-#define PL_origargv		(curinterp->Iorigargv)
-#define PL_origfilename		(curinterp->Iorigfilename)
-#define PL_ors			(curinterp->Iors)
-#define PL_orslen		(curinterp->Iorslen)
-#define PL_parsehook		(curinterp->Iparsehook)
-#define PL_patchlevel		(curinterp->Ipatchlevel)
-#define PL_pending_ident	(curinterp->Ipending_ident)
-#define PL_perl_destruct_level	(curinterp->Iperl_destruct_level)
-#define PL_perldb		(curinterp->Iperldb)
-#define PL_preambleav		(curinterp->Ipreambleav)
-#define PL_preambled		(curinterp->Ipreambled)
-#define PL_preprocess		(curinterp->Ipreprocess)
-#define PL_profiledata		(curinterp->Iprofiledata)
-#define PL_replgv		(curinterp->Ireplgv)
-#define PL_rightgv		(curinterp->Irightgv)
-#define PL_rsfp			(curinterp->Irsfp)
-#define PL_rsfp_filters		(curinterp->Irsfp_filters)
-#define PL_sawampersand		(curinterp->Isawampersand)
-#define PL_sawstudy		(curinterp->Isawstudy)
-#define PL_sawvec		(curinterp->Isawvec)
-#define PL_siggv		(curinterp->Isiggv)
-#define PL_splitstr		(curinterp->Isplitstr)
-#define PL_statusvalue		(curinterp->Istatusvalue)
-#define PL_statusvalue_vms	(curinterp->Istatusvalue_vms)
-#define PL_stdingv		(curinterp->Istdingv)
-#define PL_strchop		(curinterp->Istrchop)
-#define PL_strtab		(curinterp->Istrtab)
-#define PL_sub_generation	(curinterp->Isub_generation)
-#define PL_sublex_info		(curinterp->Isublex_info)
-#define PL_sv_arenaroot		(curinterp->Isv_arenaroot)
-#define PL_sv_count		(curinterp->Isv_count)
-#define PL_sv_objcount		(curinterp->Isv_objcount)
-#define PL_sv_root		(curinterp->Isv_root)
-#define PL_sys_intern		(curinterp->Isys_intern)
-#define PL_tainting		(curinterp->Itainting)
-#define PL_threadnum		(curinterp->Ithreadnum)
-#define PL_thrsv		(curinterp->Ithrsv)
-#define PL_unsafe		(curinterp->Iunsafe)
-#define PL_warnhook		(curinterp->Iwarnhook)
+#define PL_Argv			(PL_curinterp->IArgv)
+#define PL_Cmd			(PL_curinterp->ICmd)
+#define PL_DBcv			(PL_curinterp->IDBcv)
+#define PL_DBgv			(PL_curinterp->IDBgv)
+#define PL_DBline		(PL_curinterp->IDBline)
+#define PL_DBsignal		(PL_curinterp->IDBsignal)
+#define PL_DBsingle		(PL_curinterp->IDBsingle)
+#define PL_DBsub		(PL_curinterp->IDBsub)
+#define PL_DBtrace		(PL_curinterp->IDBtrace)
+#define PL_ampergv		(PL_curinterp->Iampergv)
+#define PL_archpat_auto		(PL_curinterp->Iarchpat_auto)
+#define PL_argvgv		(PL_curinterp->Iargvgv)
+#define PL_argvoutgv		(PL_curinterp->Iargvoutgv)
+#define PL_basetime		(PL_curinterp->Ibasetime)
+#define PL_beginav		(PL_curinterp->Ibeginav)
+#define PL_cddir		(PL_curinterp->Icddir)
+#define PL_compcv		(PL_curinterp->Icompcv)
+#define PL_compiling		(PL_curinterp->Icompiling)
+#define PL_comppad		(PL_curinterp->Icomppad)
+#define PL_comppad_name		(PL_curinterp->Icomppad_name)
+#define PL_comppad_name_fill	(PL_curinterp->Icomppad_name_fill)
+#define PL_comppad_name_floor	(PL_curinterp->Icomppad_name_floor)
+#define PL_copline		(PL_curinterp->Icopline)
+#define PL_curcopdb		(PL_curinterp->Icurcopdb)
+#define PL_curstname		(PL_curinterp->Icurstname)
+#define PL_dbargs		(PL_curinterp->Idbargs)
+#define PL_debdelim		(PL_curinterp->Idebdelim)
+#define PL_debname		(PL_curinterp->Idebname)
+#define PL_debstash		(PL_curinterp->Idebstash)
+#define PL_defgv		(PL_curinterp->Idefgv)
+#define PL_diehook		(PL_curinterp->Idiehook)
+#define PL_dlevel		(PL_curinterp->Idlevel)
+#define PL_dlmax		(PL_curinterp->Idlmax)
+#define PL_doextract		(PL_curinterp->Idoextract)
+#define PL_doswitches		(PL_curinterp->Idoswitches)
+#define PL_dowarn		(PL_curinterp->Idowarn)
+#define PL_dumplvl		(PL_curinterp->Idumplvl)
+#define PL_e_script		(PL_curinterp->Ie_script)
+#define PL_endav		(PL_curinterp->Iendav)
+#define PL_envgv		(PL_curinterp->Ienvgv)
+#define PL_errgv		(PL_curinterp->Ierrgv)
+#define PL_eval_root		(PL_curinterp->Ieval_root)
+#define PL_eval_start		(PL_curinterp->Ieval_start)
+#define PL_exitlist		(PL_curinterp->Iexitlist)
+#define PL_exitlistlen		(PL_curinterp->Iexitlistlen)
+#define PL_fdpid		(PL_curinterp->Ifdpid)
+#define PL_filemode		(PL_curinterp->Ifilemode)
+#define PL_forkprocess		(PL_curinterp->Iforkprocess)
+#define PL_formfeed		(PL_curinterp->Iformfeed)
+#define PL_generation		(PL_curinterp->Igeneration)
+#define PL_gensym		(PL_curinterp->Igensym)
+#define PL_globalstash		(PL_curinterp->Iglobalstash)
+#define PL_hintgv		(PL_curinterp->Ihintgv)
+#define PL_in_clean_all		(PL_curinterp->Iin_clean_all)
+#define PL_in_clean_objs	(PL_curinterp->Iin_clean_objs)
+#define PL_incgv		(PL_curinterp->Iincgv)
+#define PL_initav		(PL_curinterp->Iinitav)
+#define PL_inplace		(PL_curinterp->Iinplace)
+#define PL_last_proto		(PL_curinterp->Ilast_proto)
+#define PL_lastfd		(PL_curinterp->Ilastfd)
+#define PL_lastsize		(PL_curinterp->Ilastsize)
+#define PL_lastspbase		(PL_curinterp->Ilastspbase)
+#define PL_laststatval		(PL_curinterp->Ilaststatval)
+#define PL_laststype		(PL_curinterp->Ilaststype)
+#define PL_leftgv		(PL_curinterp->Ileftgv)
+#define PL_lineary		(PL_curinterp->Ilineary)
+#define PL_linestart		(PL_curinterp->Ilinestart)
+#define PL_localpatches		(PL_curinterp->Ilocalpatches)
+#define PL_main_cv		(PL_curinterp->Imain_cv)
+#define PL_main_root		(PL_curinterp->Imain_root)
+#define PL_main_start		(PL_curinterp->Imain_start)
+#define PL_maxsysfd		(PL_curinterp->Imaxsysfd)
+#define PL_mess_sv		(PL_curinterp->Imess_sv)
+#define PL_minus_F		(PL_curinterp->Iminus_F)
+#define PL_minus_a		(PL_curinterp->Iminus_a)
+#define PL_minus_c		(PL_curinterp->Iminus_c)
+#define PL_minus_l		(PL_curinterp->Iminus_l)
+#define PL_minus_n		(PL_curinterp->Iminus_n)
+#define PL_minus_p		(PL_curinterp->Iminus_p)
+#define PL_modglobal		(PL_curinterp->Imodglobal)
+#define PL_multiline		(PL_curinterp->Imultiline)
+#define PL_mystrk		(PL_curinterp->Imystrk)
+#define PL_ofmt			(PL_curinterp->Iofmt)
+#define PL_oldlastpm		(PL_curinterp->Ioldlastpm)
+#define PL_oldname		(PL_curinterp->Ioldname)
+#define PL_op_mask		(PL_curinterp->Iop_mask)
+#define PL_origargc		(PL_curinterp->Iorigargc)
+#define PL_origargv		(PL_curinterp->Iorigargv)
+#define PL_origfilename		(PL_curinterp->Iorigfilename)
+#define PL_ors			(PL_curinterp->Iors)
+#define PL_orslen		(PL_curinterp->Iorslen)
+#define PL_parsehook		(PL_curinterp->Iparsehook)
+#define PL_patchlevel		(PL_curinterp->Ipatchlevel)
+#define PL_pending_ident	(PL_curinterp->Ipending_ident)
+#define PL_perl_destruct_level	(PL_curinterp->Iperl_destruct_level)
+#define PL_perldb		(PL_curinterp->Iperldb)
+#define PL_preambleav		(PL_curinterp->Ipreambleav)
+#define PL_preambled		(PL_curinterp->Ipreambled)
+#define PL_preprocess		(PL_curinterp->Ipreprocess)
+#define PL_profiledata		(PL_curinterp->Iprofiledata)
+#define PL_replgv		(PL_curinterp->Ireplgv)
+#define PL_rightgv		(PL_curinterp->Irightgv)
+#define PL_rsfp			(PL_curinterp->Irsfp)
+#define PL_rsfp_filters		(PL_curinterp->Irsfp_filters)
+#define PL_sawampersand		(PL_curinterp->Isawampersand)
+#define PL_sawstudy		(PL_curinterp->Isawstudy)
+#define PL_sawvec		(PL_curinterp->Isawvec)
+#define PL_siggv		(PL_curinterp->Isiggv)
+#define PL_splitstr		(PL_curinterp->Isplitstr)
+#define PL_statusvalue		(PL_curinterp->Istatusvalue)
+#define PL_statusvalue_vms	(PL_curinterp->Istatusvalue_vms)
+#define PL_stdingv		(PL_curinterp->Istdingv)
+#define PL_strchop		(PL_curinterp->Istrchop)
+#define PL_strtab		(PL_curinterp->Istrtab)
+#define PL_sub_generation	(PL_curinterp->Isub_generation)
+#define PL_sublex_info		(PL_curinterp->Isublex_info)
+#define PL_sv_arenaroot		(PL_curinterp->Isv_arenaroot)
+#define PL_sv_count		(PL_curinterp->Isv_count)
+#define PL_sv_objcount		(PL_curinterp->Isv_objcount)
+#define PL_sv_root		(PL_curinterp->Isv_root)
+#define PL_sys_intern		(PL_curinterp->Isys_intern)
+#define PL_tainting		(PL_curinterp->Itainting)
+#define PL_threadnum		(PL_curinterp->Ithreadnum)
+#define PL_thrsv		(PL_curinterp->Ithrsv)
+#define PL_unsafe		(PL_curinterp->Iunsafe)
+#define PL_warnhook		(PL_curinterp->Iwarnhook)
 
 #else	/* !MULTIPLICITY */
 
-#define IArgv			PL_Argv
-#define ICmd			PL_Cmd
-#define IDBcv			PL_DBcv
-#define IDBgv			PL_DBgv
-#define IDBline			PL_DBline
-#define IDBsignal		PL_DBsignal
-#define IDBsingle		PL_DBsingle
-#define IDBsub			PL_DBsub
-#define IDBtrace		PL_DBtrace
-#define Iampergv		PL_ampergv
-#define Iarchpat_auto		PL_archpat_auto
-#define Iargvgv			PL_argvgv
-#define Iargvoutgv		PL_argvoutgv
-#define Ibasetime		PL_basetime
-#define Ibeginav		PL_beginav
-#define Icddir			PL_cddir
-#define Icompcv			PL_compcv
-#define Icompiling		PL_compiling
-#define Icomppad		PL_comppad
-#define Icomppad_name		PL_comppad_name
-#define Icomppad_name_fill	PL_comppad_name_fill
-#define Icomppad_name_floor	PL_comppad_name_floor
-#define Icopline		PL_copline
-#define Icurcopdb		PL_curcopdb
-#define Icurstname		PL_curstname
-#define Idbargs			PL_dbargs
-#define Idebdelim		PL_debdelim
-#define Idebname		PL_debname
-#define Idebstash		PL_debstash
-#define Idefgv			PL_defgv
-#define Idiehook		PL_diehook
-#define Idlevel			PL_dlevel
-#define Idlmax			PL_dlmax
-#define Idoextract		PL_doextract
-#define Idoswitches		PL_doswitches
-#define Idowarn			PL_dowarn
-#define Idumplvl		PL_dumplvl
-#define Ie_script		PL_e_script
-#define Iendav			PL_endav
-#define Ienvgv			PL_envgv
-#define Ierrgv			PL_errgv
-#define Ieval_root		PL_eval_root
-#define Ieval_start		PL_eval_start
-#define Iexitlist		PL_exitlist
-#define Iexitlistlen		PL_exitlistlen
-#define Ifdpid			PL_fdpid
-#define Ifilemode		PL_filemode
-#define Iforkprocess		PL_forkprocess
-#define Iformfeed		PL_formfeed
-#define Igeneration		PL_generation
-#define Igensym			PL_gensym
-#define Iglobalstash		PL_globalstash
-#define Ihintgv			PL_hintgv
-#define Iin_clean_all		PL_in_clean_all
-#define Iin_clean_objs		PL_in_clean_objs
-#define Iincgv			PL_incgv
-#define Iinitav			PL_initav
-#define Iinplace		PL_inplace
-#define Ilast_proto		PL_last_proto
-#define Ilastfd			PL_lastfd
-#define Ilastsize		PL_lastsize
-#define Ilastspbase		PL_lastspbase
-#define Ilaststatval		PL_laststatval
-#define Ilaststype		PL_laststype
-#define Ileftgv			PL_leftgv
-#define Ilineary		PL_lineary
-#define Ilinestart		PL_linestart
-#define Ilocalpatches		PL_localpatches
-#define Imain_cv		PL_main_cv
-#define Imain_root		PL_main_root
-#define Imain_start		PL_main_start
-#define Imaxsysfd		PL_maxsysfd
-#define Imess_sv		PL_mess_sv
-#define Iminus_F		PL_minus_F
-#define Iminus_a		PL_minus_a
-#define Iminus_c		PL_minus_c
-#define Iminus_l		PL_minus_l
-#define Iminus_n		PL_minus_n
-#define Iminus_p		PL_minus_p
-#define Imodglobal		PL_modglobal
-#define Imultiline		PL_multiline
-#define Imystrk			PL_mystrk
-#define Iofmt			PL_ofmt
-#define Ioldlastpm		PL_oldlastpm
-#define Ioldname		PL_oldname
-#define Iop_mask		PL_op_mask
-#define Iorigargc		PL_origargc
-#define Iorigargv		PL_origargv
-#define Iorigfilename		PL_origfilename
-#define Iors			PL_ors
-#define Iorslen			PL_orslen
-#define Iparsehook		PL_parsehook
-#define Ipatchlevel		PL_patchlevel
-#define Ipending_ident		PL_pending_ident
-#define Iperl_destruct_level	PL_perl_destruct_level
-#define Iperldb			PL_perldb
-#define Ipreambleav		PL_preambleav
-#define Ipreambled		PL_preambled
-#define Ipreprocess		PL_preprocess
-#define Iprofiledata		PL_profiledata
-#define Ireplgv			PL_replgv
-#define Irightgv		PL_rightgv
-#define Irsfp			PL_rsfp
-#define Irsfp_filters		PL_rsfp_filters
-#define Isawampersand		PL_sawampersand
-#define Isawstudy		PL_sawstudy
-#define Isawvec			PL_sawvec
-#define Isiggv			PL_siggv
-#define Isplitstr		PL_splitstr
-#define Istatusvalue		PL_statusvalue
-#define Istatusvalue_vms	PL_statusvalue_vms
-#define Istdingv		PL_stdingv
-#define Istrchop		PL_strchop
-#define Istrtab			PL_strtab
-#define Isub_generation		PL_sub_generation
-#define Isublex_info		PL_sublex_info
-#define Isv_arenaroot		PL_sv_arenaroot
-#define Isv_count		PL_sv_count
-#define Isv_objcount		PL_sv_objcount
-#define Isv_root		PL_sv_root
-#define Isys_intern		PL_sys_intern
-#define Itainting		PL_tainting
-#define Ithreadnum		PL_threadnum
-#define Ithrsv			PL_thrsv
-#define Iunsafe			PL_unsafe
-#define Iwarnhook		PL_warnhook
+#define PL_IArgv		PL_Argv
+#define PL_ICmd			PL_Cmd
+#define PL_IDBcv		PL_DBcv
+#define PL_IDBgv		PL_DBgv
+#define PL_IDBline		PL_DBline
+#define PL_IDBsignal		PL_DBsignal
+#define PL_IDBsingle		PL_DBsingle
+#define PL_IDBsub		PL_DBsub
+#define PL_IDBtrace		PL_DBtrace
+#define PL_Iampergv		PL_ampergv
+#define PL_Iarchpat_auto	PL_archpat_auto
+#define PL_Iargvgv		PL_argvgv
+#define PL_Iargvoutgv		PL_argvoutgv
+#define PL_Ibasetime		PL_basetime
+#define PL_Ibeginav		PL_beginav
+#define PL_Icddir		PL_cddir
+#define PL_Icompcv		PL_compcv
+#define PL_Icompiling		PL_compiling
+#define PL_Icomppad		PL_comppad
+#define PL_Icomppad_name	PL_comppad_name
+#define PL_Icomppad_name_fill	PL_comppad_name_fill
+#define PL_Icomppad_name_floor	PL_comppad_name_floor
+#define PL_Icopline		PL_copline
+#define PL_Icurcopdb		PL_curcopdb
+#define PL_Icurstname		PL_curstname
+#define PL_Idbargs		PL_dbargs
+#define PL_Idebdelim		PL_debdelim
+#define PL_Idebname		PL_debname
+#define PL_Idebstash		PL_debstash
+#define PL_Idefgv		PL_defgv
+#define PL_Idiehook		PL_diehook
+#define PL_Idlevel		PL_dlevel
+#define PL_Idlmax		PL_dlmax
+#define PL_Idoextract		PL_doextract
+#define PL_Idoswitches		PL_doswitches
+#define PL_Idowarn		PL_dowarn
+#define PL_Idumplvl		PL_dumplvl
+#define PL_Ie_script		PL_e_script
+#define PL_Iendav		PL_endav
+#define PL_Ienvgv		PL_envgv
+#define PL_Ierrgv		PL_errgv
+#define PL_Ieval_root		PL_eval_root
+#define PL_Ieval_start		PL_eval_start
+#define PL_Iexitlist		PL_exitlist
+#define PL_Iexitlistlen		PL_exitlistlen
+#define PL_Ifdpid		PL_fdpid
+#define PL_Ifilemode		PL_filemode
+#define PL_Iforkprocess		PL_forkprocess
+#define PL_Iformfeed		PL_formfeed
+#define PL_Igeneration		PL_generation
+#define PL_Igensym		PL_gensym
+#define PL_Iglobalstash		PL_globalstash
+#define PL_Ihintgv		PL_hintgv
+#define PL_Iin_clean_all	PL_in_clean_all
+#define PL_Iin_clean_objs	PL_in_clean_objs
+#define PL_Iincgv		PL_incgv
+#define PL_Iinitav		PL_initav
+#define PL_Iinplace		PL_inplace
+#define PL_Ilast_proto		PL_last_proto
+#define PL_Ilastfd		PL_lastfd
+#define PL_Ilastsize		PL_lastsize
+#define PL_Ilastspbase		PL_lastspbase
+#define PL_Ilaststatval		PL_laststatval
+#define PL_Ilaststype		PL_laststype
+#define PL_Ileftgv		PL_leftgv
+#define PL_Ilineary		PL_lineary
+#define PL_Ilinestart		PL_linestart
+#define PL_Ilocalpatches	PL_localpatches
+#define PL_Imain_cv		PL_main_cv
+#define PL_Imain_root		PL_main_root
+#define PL_Imain_start		PL_main_start
+#define PL_Imaxsysfd		PL_maxsysfd
+#define PL_Imess_sv		PL_mess_sv
+#define PL_Iminus_F		PL_minus_F
+#define PL_Iminus_a		PL_minus_a
+#define PL_Iminus_c		PL_minus_c
+#define PL_Iminus_l		PL_minus_l
+#define PL_Iminus_n		PL_minus_n
+#define PL_Iminus_p		PL_minus_p
+#define PL_Imodglobal		PL_modglobal
+#define PL_Imultiline		PL_multiline
+#define PL_Imystrk		PL_mystrk
+#define PL_Iofmt		PL_ofmt
+#define PL_Ioldlastpm		PL_oldlastpm
+#define PL_Ioldname		PL_oldname
+#define PL_Iop_mask		PL_op_mask
+#define PL_Iorigargc		PL_origargc
+#define PL_Iorigargv		PL_origargv
+#define PL_Iorigfilename	PL_origfilename
+#define PL_Iors			PL_ors
+#define PL_Iorslen		PL_orslen
+#define PL_Iparsehook		PL_parsehook
+#define PL_Ipatchlevel		PL_patchlevel
+#define PL_Ipending_ident	PL_pending_ident
+#define PL_Iperl_destruct_level	PL_perl_destruct_level
+#define PL_Iperldb		PL_perldb
+#define PL_Ipreambleav		PL_preambleav
+#define PL_Ipreambled		PL_preambled
+#define PL_Ipreprocess		PL_preprocess
+#define PL_Iprofiledata		PL_profiledata
+#define PL_Ireplgv		PL_replgv
+#define PL_Irightgv		PL_rightgv
+#define PL_Irsfp		PL_rsfp
+#define PL_Irsfp_filters	PL_rsfp_filters
+#define PL_Isawampersand	PL_sawampersand
+#define PL_Isawstudy		PL_sawstudy
+#define PL_Isawvec		PL_sawvec
+#define PL_Isiggv		PL_siggv
+#define PL_Isplitstr		PL_splitstr
+#define PL_Istatusvalue		PL_statusvalue
+#define PL_Istatusvalue_vms	PL_statusvalue_vms
+#define PL_Istdingv		PL_stdingv
+#define PL_Istrchop		PL_strchop
+#define PL_Istrtab		PL_strtab
+#define PL_Isub_generation	PL_sub_generation
+#define PL_Isublex_info		PL_sublex_info
+#define PL_Isv_arenaroot	PL_sv_arenaroot
+#define PL_Isv_count		PL_sv_count
+#define PL_Isv_objcount		PL_sv_objcount
+#define PL_Isv_root		PL_sv_root
+#define PL_Isys_intern		PL_sys_intern
+#define PL_Itainting		PL_tainting
+#define PL_Ithreadnum		PL_threadnum
+#define PL_Ithrsv		PL_thrsv
+#define PL_Iunsafe		PL_unsafe
+#define PL_Iwarnhook		PL_warnhook
 
 #ifndef USE_THREADS
 
-#define TSv			PL_Sv
-#define TXpv			PL_Xpv
-#define Tav_fetch_sv		PL_av_fetch_sv
-#define Tbodytarget		PL_bodytarget
-#define Tbostr			PL_bostr
-#define Tchopset		PL_chopset
-#define Tcolors			PL_colors
-#define Tcolorset		PL_colorset
-#define Tcurcop			PL_curcop
-#define Tcurpad			PL_curpad
-#define Tcurpm			PL_curpm
-#define Tcurstack		PL_curstack
-#define Tcurstackinfo		PL_curstackinfo
-#define Tcurstash		PL_curstash
-#define Tdefoutgv		PL_defoutgv
-#define Tdefstash		PL_defstash
-#define Tdelaymagic		PL_delaymagic
-#define Tdirty			PL_dirty
-#define Textralen		PL_extralen
-#define Tfirstgv		PL_firstgv
-#define Tformtarget		PL_formtarget
-#define Thv_fetch_ent_mh	PL_hv_fetch_ent_mh
-#define Thv_fetch_sv		PL_hv_fetch_sv
-#define Tin_eval		PL_in_eval
-#define Tlast_in_gv		PL_last_in_gv
-#define Tlastgotoprobe		PL_lastgotoprobe
-#define Tlastscream		PL_lastscream
-#define Tlocalizing		PL_localizing
-#define Tmainstack		PL_mainstack
-#define Tmarkstack		PL_markstack
-#define Tmarkstack_max		PL_markstack_max
-#define Tmarkstack_ptr		PL_markstack_ptr
-#define Tmaxscream		PL_maxscream
-#define Tmodcount		PL_modcount
-#define Tnrs			PL_nrs
-#define Tofs			PL_ofs
-#define Tofslen			PL_ofslen
-#define Top			PL_op
-#define Topsave			PL_opsave
-#define Treg_eval_set		PL_reg_eval_set
-#define Treg_flags		PL_reg_flags
-#define Treg_start_tmp		PL_reg_start_tmp
-#define Treg_start_tmpl		PL_reg_start_tmpl
-#define Tregbol			PL_regbol
-#define Tregcc			PL_regcc
-#define Tregcode		PL_regcode
-#define Tregcomp_parse		PL_regcomp_parse
-#define Tregcomp_rx		PL_regcomp_rx
-#define Tregcompp		PL_regcompp
-#define Tregdata		PL_regdata
-#define Tregdummy		PL_regdummy
-#define Tregendp		PL_regendp
-#define Tregeol			PL_regeol
-#define Tregexecp		PL_regexecp
-#define Tregflags		PL_regflags
-#define Tregindent		PL_regindent
-#define Treginput		PL_reginput
-#define Treginterp_cnt		PL_reginterp_cnt
-#define Treglastparen		PL_reglastparen
-#define Tregnarrate		PL_regnarrate
-#define Tregnaughty		PL_regnaughty
-#define Tregnpar		PL_regnpar
-#define Tregprecomp		PL_regprecomp
-#define Tregprev		PL_regprev
-#define Tregprogram		PL_regprogram
-#define Tregsawback		PL_regsawback
-#define Tregseen		PL_regseen
-#define Tregsize		PL_regsize
-#define Tregstartp		PL_regstartp
-#define Tregtill		PL_regtill
-#define Tregxend		PL_regxend
-#define Trestartop		PL_restartop
-#define Tretstack		PL_retstack
-#define Tretstack_ix		PL_retstack_ix
-#define Tretstack_max		PL_retstack_max
-#define Trs			PL_rs
-#define Tsavestack		PL_savestack
-#define Tsavestack_ix		PL_savestack_ix
-#define Tsavestack_max		PL_savestack_max
-#define Tscopestack		PL_scopestack
-#define Tscopestack_ix		PL_scopestack_ix
-#define Tscopestack_max		PL_scopestack_max
-#define Tscreamfirst		PL_screamfirst
-#define Tscreamnext		PL_screamnext
-#define Tsecondgv		PL_secondgv
-#define Tseen_evals		PL_seen_evals
-#define Tseen_zerolen		PL_seen_zerolen
-#define Tsortcop		PL_sortcop
-#define Tsortcxix		PL_sortcxix
-#define Tsortstash		PL_sortstash
-#define Tstack_base		PL_stack_base
-#define Tstack_max		PL_stack_max
-#define Tstack_sp		PL_stack_sp
-#define Tstart_env		PL_start_env
-#define Tstatbuf		PL_statbuf
-#define Tstatcache		PL_statcache
-#define Tstatgv			PL_statgv
-#define Tstatname		PL_statname
-#define Ttainted		PL_tainted
-#define Ttimesbuf		PL_timesbuf
-#define Ttmps_floor		PL_tmps_floor
-#define Ttmps_ix		PL_tmps_ix
-#define Ttmps_max		PL_tmps_max
-#define Ttmps_stack		PL_tmps_stack
-#define Ttop_env		PL_top_env
-#define Ttoptarget		PL_toptarget
+#define PL_TSv			PL_Sv
+#define PL_TXpv			PL_Xpv
+#define PL_Tav_fetch_sv		PL_av_fetch_sv
+#define PL_Tbodytarget		PL_bodytarget
+#define PL_Tbostr		PL_bostr
+#define PL_Tchopset		PL_chopset
+#define PL_Tcolors		PL_colors
+#define PL_Tcolorset		PL_colorset
+#define PL_Tcurcop		PL_curcop
+#define PL_Tcurpad		PL_curpad
+#define PL_Tcurpm		PL_curpm
+#define PL_Tcurstack		PL_curstack
+#define PL_Tcurstackinfo	PL_curstackinfo
+#define PL_Tcurstash		PL_curstash
+#define PL_Tdefoutgv		PL_defoutgv
+#define PL_Tdefstash		PL_defstash
+#define PL_Tdelaymagic		PL_delaymagic
+#define PL_Tdirty		PL_dirty
+#define PL_Textralen		PL_extralen
+#define PL_Tfirstgv		PL_firstgv
+#define PL_Tformtarget		PL_formtarget
+#define PL_Thv_fetch_ent_mh	PL_hv_fetch_ent_mh
+#define PL_Thv_fetch_sv		PL_hv_fetch_sv
+#define PL_Tin_eval		PL_in_eval
+#define PL_Tlast_in_gv		PL_last_in_gv
+#define PL_Tlastgotoprobe	PL_lastgotoprobe
+#define PL_Tlastscream		PL_lastscream
+#define PL_Tlocalizing		PL_localizing
+#define PL_Tmainstack		PL_mainstack
+#define PL_Tmarkstack		PL_markstack
+#define PL_Tmarkstack_max	PL_markstack_max
+#define PL_Tmarkstack_ptr	PL_markstack_ptr
+#define PL_Tmaxscream		PL_maxscream
+#define PL_Tmodcount		PL_modcount
+#define PL_Tnrs			PL_nrs
+#define PL_Tofs			PL_ofs
+#define PL_Tofslen		PL_ofslen
+#define PL_Top			PL_op
+#define PL_Topsave		PL_opsave
+#define PL_Treg_eval_set	PL_reg_eval_set
+#define PL_Treg_flags		PL_reg_flags
+#define PL_Treg_start_tmp	PL_reg_start_tmp
+#define PL_Treg_start_tmpl	PL_reg_start_tmpl
+#define PL_Tregbol		PL_regbol
+#define PL_Tregcc		PL_regcc
+#define PL_Tregcode		PL_regcode
+#define PL_Tregcomp_parse	PL_regcomp_parse
+#define PL_Tregcomp_rx		PL_regcomp_rx
+#define PL_Tregcompp		PL_regcompp
+#define PL_Tregdata		PL_regdata
+#define PL_Tregdummy		PL_regdummy
+#define PL_Tregendp		PL_regendp
+#define PL_Tregeol		PL_regeol
+#define PL_Tregexecp		PL_regexecp
+#define PL_Tregflags		PL_regflags
+#define PL_Tregindent		PL_regindent
+#define PL_Treginput		PL_reginput
+#define PL_Treginterp_cnt	PL_reginterp_cnt
+#define PL_Treglastparen	PL_reglastparen
+#define PL_Tregnarrate		PL_regnarrate
+#define PL_Tregnaughty		PL_regnaughty
+#define PL_Tregnpar		PL_regnpar
+#define PL_Tregprecomp		PL_regprecomp
+#define PL_Tregprev		PL_regprev
+#define PL_Tregprogram		PL_regprogram
+#define PL_Tregsawback		PL_regsawback
+#define PL_Tregseen		PL_regseen
+#define PL_Tregsize		PL_regsize
+#define PL_Tregstartp		PL_regstartp
+#define PL_Tregtill		PL_regtill
+#define PL_Tregxend		PL_regxend
+#define PL_Trestartop		PL_restartop
+#define PL_Tretstack		PL_retstack
+#define PL_Tretstack_ix		PL_retstack_ix
+#define PL_Tretstack_max	PL_retstack_max
+#define PL_Trs			PL_rs
+#define PL_Tsavestack		PL_savestack
+#define PL_Tsavestack_ix	PL_savestack_ix
+#define PL_Tsavestack_max	PL_savestack_max
+#define PL_Tscopestack		PL_scopestack
+#define PL_Tscopestack_ix	PL_scopestack_ix
+#define PL_Tscopestack_max	PL_scopestack_max
+#define PL_Tscreamfirst		PL_screamfirst
+#define PL_Tscreamnext		PL_screamnext
+#define PL_Tsecondgv		PL_secondgv
+#define PL_Tseen_evals		PL_seen_evals
+#define PL_Tseen_zerolen	PL_seen_zerolen
+#define PL_Tsortcop		PL_sortcop
+#define PL_Tsortcxix		PL_sortcxix
+#define PL_Tsortstash		PL_sortstash
+#define PL_Tstack_base		PL_stack_base
+#define PL_Tstack_max		PL_stack_max
+#define PL_Tstack_sp		PL_stack_sp
+#define PL_Tstart_env		PL_start_env
+#define PL_Tstatbuf		PL_statbuf
+#define PL_Tstatcache		PL_statcache
+#define PL_Tstatgv		PL_statgv
+#define PL_Tstatname		PL_statname
+#define PL_Ttainted		PL_tainted
+#define PL_Ttimesbuf		PL_timesbuf
+#define PL_Ttmps_floor		PL_tmps_floor
+#define PL_Ttmps_ix		PL_tmps_ix
+#define PL_Ttmps_max		PL_tmps_max
+#define PL_Ttmps_stack		PL_tmps_stack
+#define PL_Ttop_env		PL_top_env
+#define PL_Ttoptarget		PL_toptarget
 
 #endif /* USE_THREADS */
 
@@ -625,223 +625,223 @@
 
 #ifdef PERL_GLOBAL_STRUCT
 
-#define PL_No			(Perl_Vars.GNo)
-#define PL_Yes			(Perl_Vars.GYes)
-#define PL_amagic_generation	(Perl_Vars.Gamagic_generation)
-#define PL_an			(Perl_Vars.Gan)
-#define PL_bufend		(Perl_Vars.Gbufend)
-#define PL_bufptr		(Perl_Vars.Gbufptr)
-#define PL_collation_ix		(Perl_Vars.Gcollation_ix)
-#define PL_collation_name	(Perl_Vars.Gcollation_name)
-#define PL_collation_standard	(Perl_Vars.Gcollation_standard)
-#define PL_collxfrm_base	(Perl_Vars.Gcollxfrm_base)
-#define PL_collxfrm_mult	(Perl_Vars.Gcollxfrm_mult)
-#define PL_cop_seqmax		(Perl_Vars.Gcop_seqmax)
-#define PL_cryptseen		(Perl_Vars.Gcryptseen)
-#define PL_cshlen		(Perl_Vars.Gcshlen)
-#define PL_cshname		(Perl_Vars.Gcshname)
-#define PL_curinterp		(Perl_Vars.Gcurinterp)
-#define PL_curthr		(Perl_Vars.Gcurthr)
-#define PL_debug		(Perl_Vars.Gdebug)
-#define PL_do_undump		(Perl_Vars.Gdo_undump)
-#define PL_egid			(Perl_Vars.Gegid)
-#define PL_error_count		(Perl_Vars.Gerror_count)
-#define PL_euid			(Perl_Vars.Geuid)
-#define PL_eval_cond		(Perl_Vars.Geval_cond)
-#define PL_eval_mutex		(Perl_Vars.Geval_mutex)
-#define PL_eval_owner		(Perl_Vars.Geval_owner)
-#define PL_evalseq		(Perl_Vars.Gevalseq)
-#define PL_expect		(Perl_Vars.Gexpect)
-#define PL_gid			(Perl_Vars.Ggid)
-#define PL_he_root		(Perl_Vars.Ghe_root)
-#define PL_hexdigit		(Perl_Vars.Ghexdigit)
-#define PL_hints		(Perl_Vars.Ghints)
-#define PL_in_my		(Perl_Vars.Gin_my)
-#define PL_in_my_stash		(Perl_Vars.Gin_my_stash)
-#define PL_last_lop		(Perl_Vars.Glast_lop)
-#define PL_last_lop_op		(Perl_Vars.Glast_lop_op)
-#define PL_last_uni		(Perl_Vars.Glast_uni)
-#define PL_lex_brackets		(Perl_Vars.Glex_brackets)
-#define PL_lex_brackstack	(Perl_Vars.Glex_brackstack)
-#define PL_lex_casemods		(Perl_Vars.Glex_casemods)
-#define PL_lex_casestack	(Perl_Vars.Glex_casestack)
-#define PL_lex_defer		(Perl_Vars.Glex_defer)
-#define PL_lex_dojoin		(Perl_Vars.Glex_dojoin)
-#define PL_lex_expect		(Perl_Vars.Glex_expect)
-#define PL_lex_fakebrack	(Perl_Vars.Glex_fakebrack)
-#define PL_lex_formbrack	(Perl_Vars.Glex_formbrack)
-#define PL_lex_inpat		(Perl_Vars.Glex_inpat)
-#define PL_lex_inwhat		(Perl_Vars.Glex_inwhat)
-#define PL_lex_op		(Perl_Vars.Glex_op)
-#define PL_lex_repl		(Perl_Vars.Glex_repl)
-#define PL_lex_starts		(Perl_Vars.Glex_starts)
-#define PL_lex_state		(Perl_Vars.Glex_state)
-#define PL_lex_stuff		(Perl_Vars.Glex_stuff)
-#define PL_linestr		(Perl_Vars.Glinestr)
-#define PL_malloc_mutex		(Perl_Vars.Gmalloc_mutex)
-#define PL_max_intro_pending	(Perl_Vars.Gmax_intro_pending)
-#define PL_maxo			(Perl_Vars.Gmaxo)
-#define PL_min_intro_pending	(Perl_Vars.Gmin_intro_pending)
-#define PL_multi_close		(Perl_Vars.Gmulti_close)
-#define PL_multi_end		(Perl_Vars.Gmulti_end)
-#define PL_multi_open		(Perl_Vars.Gmulti_open)
-#define PL_multi_start		(Perl_Vars.Gmulti_start)
-#define PL_na			(Perl_Vars.Gna)
-#define PL_nexttoke		(Perl_Vars.Gnexttoke)
-#define PL_nexttype		(Perl_Vars.Gnexttype)
-#define PL_nextval		(Perl_Vars.Gnextval)
-#define PL_nice_chunk		(Perl_Vars.Gnice_chunk)
-#define PL_nice_chunk_size	(Perl_Vars.Gnice_chunk_size)
-#define PL_ninterps		(Perl_Vars.Gninterps)
-#define PL_nomemok		(Perl_Vars.Gnomemok)
-#define PL_nthreads		(Perl_Vars.Gnthreads)
-#define PL_nthreads_cond	(Perl_Vars.Gnthreads_cond)
-#define PL_numeric_local	(Perl_Vars.Gnumeric_local)
-#define PL_numeric_name		(Perl_Vars.Gnumeric_name)
-#define PL_numeric_standard	(Perl_Vars.Gnumeric_standard)
-#define PL_oldbufptr		(Perl_Vars.Goldbufptr)
-#define PL_oldoldbufptr		(Perl_Vars.Goldoldbufptr)
-#define PL_op_seqmax		(Perl_Vars.Gop_seqmax)
-#define PL_origalen		(Perl_Vars.Gorigalen)
-#define PL_origenviron		(Perl_Vars.Gorigenviron)
-#define PL_osname		(Perl_Vars.Gosname)
-#define PL_pad_reset_pending	(Perl_Vars.Gpad_reset_pending)
-#define PL_padix		(Perl_Vars.Gpadix)
-#define PL_padix_floor		(Perl_Vars.Gpadix_floor)
-#define PL_patleave		(Perl_Vars.Gpatleave)
-#define PL_pidstatus		(Perl_Vars.Gpidstatus)
-#define PL_runops		(Perl_Vars.Grunops)
-#define PL_sh_path		(Perl_Vars.Gsh_path)
-#define PL_sighandlerp		(Perl_Vars.Gsighandlerp)
-#define PL_specialsv_list	(Perl_Vars.Gspecialsv_list)
-#define PL_subline		(Perl_Vars.Gsubline)
-#define PL_subname		(Perl_Vars.Gsubname)
-#define PL_sv_mutex		(Perl_Vars.Gsv_mutex)
-#define PL_sv_no		(Perl_Vars.Gsv_no)
-#define PL_sv_undef		(Perl_Vars.Gsv_undef)
-#define PL_sv_yes		(Perl_Vars.Gsv_yes)
-#define PL_svref_mutex		(Perl_Vars.Gsvref_mutex)
-#define PL_thisexpr		(Perl_Vars.Gthisexpr)
-#define PL_thr_key		(Perl_Vars.Gthr_key)
-#define PL_threads_mutex	(Perl_Vars.Gthreads_mutex)
-#define PL_threadsv_names	(Perl_Vars.Gthreadsv_names)
-#define PL_tokenbuf		(Perl_Vars.Gtokenbuf)
-#define PL_uid			(Perl_Vars.Guid)
-#define PL_xiv_arenaroot	(Perl_Vars.Gxiv_arenaroot)
-#define PL_xiv_root		(Perl_Vars.Gxiv_root)
-#define PL_xnv_root		(Perl_Vars.Gxnv_root)
-#define PL_xpv_root		(Perl_Vars.Gxpv_root)
-#define PL_xrv_root		(Perl_Vars.Gxrv_root)
+#define PL_No			(PL_Vars.GNo)
+#define PL_Yes			(PL_Vars.GYes)
+#define PL_amagic_generation	(PL_Vars.Gamagic_generation)
+#define PL_an			(PL_Vars.Gan)
+#define PL_bufend		(PL_Vars.Gbufend)
+#define PL_bufptr		(PL_Vars.Gbufptr)
+#define PL_collation_ix		(PL_Vars.Gcollation_ix)
+#define PL_collation_name	(PL_Vars.Gcollation_name)
+#define PL_collation_standard	(PL_Vars.Gcollation_standard)
+#define PL_collxfrm_base	(PL_Vars.Gcollxfrm_base)
+#define PL_collxfrm_mult	(PL_Vars.Gcollxfrm_mult)
+#define PL_cop_seqmax		(PL_Vars.Gcop_seqmax)
+#define PL_cryptseen		(PL_Vars.Gcryptseen)
+#define PL_cshlen		(PL_Vars.Gcshlen)
+#define PL_cshname		(PL_Vars.Gcshname)
+#define PL_curinterp		(PL_Vars.Gcurinterp)
+#define PL_curthr		(PL_Vars.Gcurthr)
+#define PL_debug		(PL_Vars.Gdebug)
+#define PL_do_undump		(PL_Vars.Gdo_undump)
+#define PL_egid			(PL_Vars.Gegid)
+#define PL_error_count		(PL_Vars.Gerror_count)
+#define PL_euid			(PL_Vars.Geuid)
+#define PL_eval_cond		(PL_Vars.Geval_cond)
+#define PL_eval_mutex		(PL_Vars.Geval_mutex)
+#define PL_eval_owner		(PL_Vars.Geval_owner)
+#define PL_evalseq		(PL_Vars.Gevalseq)
+#define PL_expect		(PL_Vars.Gexpect)
+#define PL_gid			(PL_Vars.Ggid)
+#define PL_he_root		(PL_Vars.Ghe_root)
+#define PL_hexdigit		(PL_Vars.Ghexdigit)
+#define PL_hints		(PL_Vars.Ghints)
+#define PL_in_my		(PL_Vars.Gin_my)
+#define PL_in_my_stash		(PL_Vars.Gin_my_stash)
+#define PL_last_lop		(PL_Vars.Glast_lop)
+#define PL_last_lop_op		(PL_Vars.Glast_lop_op)
+#define PL_last_uni		(PL_Vars.Glast_uni)
+#define PL_lex_brackets		(PL_Vars.Glex_brackets)
+#define PL_lex_brackstack	(PL_Vars.Glex_brackstack)
+#define PL_lex_casemods		(PL_Vars.Glex_casemods)
+#define PL_lex_casestack	(PL_Vars.Glex_casestack)
+#define PL_lex_defer		(PL_Vars.Glex_defer)
+#define PL_lex_dojoin		(PL_Vars.Glex_dojoin)
+#define PL_lex_expect		(PL_Vars.Glex_expect)
+#define PL_lex_fakebrack	(PL_Vars.Glex_fakebrack)
+#define PL_lex_formbrack	(PL_Vars.Glex_formbrack)
+#define PL_lex_inpat		(PL_Vars.Glex_inpat)
+#define PL_lex_inwhat		(PL_Vars.Glex_inwhat)
+#define PL_lex_op		(PL_Vars.Glex_op)
+#define PL_lex_repl		(PL_Vars.Glex_repl)
+#define PL_lex_starts		(PL_Vars.Glex_starts)
+#define PL_lex_state		(PL_Vars.Glex_state)
+#define PL_lex_stuff		(PL_Vars.Glex_stuff)
+#define PL_linestr		(PL_Vars.Glinestr)
+#define PL_malloc_mutex		(PL_Vars.Gmalloc_mutex)
+#define PL_max_intro_pending	(PL_Vars.Gmax_intro_pending)
+#define PL_maxo			(PL_Vars.Gmaxo)
+#define PL_min_intro_pending	(PL_Vars.Gmin_intro_pending)
+#define PL_multi_close		(PL_Vars.Gmulti_close)
+#define PL_multi_end		(PL_Vars.Gmulti_end)
+#define PL_multi_open		(PL_Vars.Gmulti_open)
+#define PL_multi_start		(PL_Vars.Gmulti_start)
+#define PL_na			(PL_Vars.Gna)
+#define PL_nexttoke		(PL_Vars.Gnexttoke)
+#define PL_nexttype		(PL_Vars.Gnexttype)
+#define PL_nextval		(PL_Vars.Gnextval)
+#define PL_nice_chunk		(PL_Vars.Gnice_chunk)
+#define PL_nice_chunk_size	(PL_Vars.Gnice_chunk_size)
+#define PL_ninterps		(PL_Vars.Gninterps)
+#define PL_nomemok		(PL_Vars.Gnomemok)
+#define PL_nthreads		(PL_Vars.Gnthreads)
+#define PL_nthreads_cond	(PL_Vars.Gnthreads_cond)
+#define PL_numeric_local	(PL_Vars.Gnumeric_local)
+#define PL_numeric_name		(PL_Vars.Gnumeric_name)
+#define PL_numeric_standard	(PL_Vars.Gnumeric_standard)
+#define PL_oldbufptr		(PL_Vars.Goldbufptr)
+#define PL_oldoldbufptr		(PL_Vars.Goldoldbufptr)
+#define PL_op_seqmax		(PL_Vars.Gop_seqmax)
+#define PL_origalen		(PL_Vars.Gorigalen)
+#define PL_origenviron		(PL_Vars.Gorigenviron)
+#define PL_osname		(PL_Vars.Gosname)
+#define PL_pad_reset_pending	(PL_Vars.Gpad_reset_pending)
+#define PL_padix		(PL_Vars.Gpadix)
+#define PL_padix_floor		(PL_Vars.Gpadix_floor)
+#define PL_patleave		(PL_Vars.Gpatleave)
+#define PL_pidstatus		(PL_Vars.Gpidstatus)
+#define PL_runops		(PL_Vars.Grunops)
+#define PL_sh_path		(PL_Vars.Gsh_path)
+#define PL_sighandlerp		(PL_Vars.Gsighandlerp)
+#define PL_specialsv_list	(PL_Vars.Gspecialsv_list)
+#define PL_subline		(PL_Vars.Gsubline)
+#define PL_subname		(PL_Vars.Gsubname)
+#define PL_sv_mutex		(PL_Vars.Gsv_mutex)
+#define PL_sv_no		(PL_Vars.Gsv_no)
+#define PL_sv_undef		(PL_Vars.Gsv_undef)
+#define PL_sv_yes		(PL_Vars.Gsv_yes)
+#define PL_svref_mutex		(PL_Vars.Gsvref_mutex)
+#define PL_thisexpr		(PL_Vars.Gthisexpr)
+#define PL_thr_key		(PL_Vars.Gthr_key)
+#define PL_threads_mutex	(PL_Vars.Gthreads_mutex)
+#define PL_threadsv_names	(PL_Vars.Gthreadsv_names)
+#define PL_tokenbuf		(PL_Vars.Gtokenbuf)
+#define PL_uid			(PL_Vars.Guid)
+#define PL_xiv_arenaroot	(PL_Vars.Gxiv_arenaroot)
+#define PL_xiv_root		(PL_Vars.Gxiv_root)
+#define PL_xnv_root		(PL_Vars.Gxnv_root)
+#define PL_xpv_root		(PL_Vars.Gxpv_root)
+#define PL_xrv_root		(PL_Vars.Gxrv_root)
 
 #else /* !PERL_GLOBAL_STRUCT */
 
-#define GNo			PL_No
-#define GYes			PL_Yes
-#define Gamagic_generation	PL_amagic_generation
-#define Gan			PL_an
-#define Gbufend			PL_bufend
-#define Gbufptr			PL_bufptr
-#define Gcollation_ix		PL_collation_ix
-#define Gcollation_name		PL_collation_name
-#define Gcollation_standard	PL_collation_standard
-#define Gcollxfrm_base		PL_collxfrm_base
-#define Gcollxfrm_mult		PL_collxfrm_mult
-#define Gcop_seqmax		PL_cop_seqmax
-#define Gcryptseen		PL_cryptseen
-#define Gcshlen			PL_cshlen
-#define Gcshname		PL_cshname
-#define Gcurinterp		PL_curinterp
-#define Gcurthr			PL_curthr
-#define Gdebug			PL_debug
-#define Gdo_undump		PL_do_undump
-#define Gegid			PL_egid
-#define Gerror_count		PL_error_count
-#define Geuid			PL_euid
-#define Geval_cond		PL_eval_cond
-#define Geval_mutex		PL_eval_mutex
-#define Geval_owner		PL_eval_owner
-#define Gevalseq		PL_evalseq
-#define Gexpect			PL_expect
-#define Ggid			PL_gid
-#define Ghe_root		PL_he_root
-#define Ghexdigit		PL_hexdigit
-#define Ghints			PL_hints
-#define Gin_my			PL_in_my
-#define Gin_my_stash		PL_in_my_stash
-#define Glast_lop		PL_last_lop
-#define Glast_lop_op		PL_last_lop_op
-#define Glast_uni		PL_last_uni
-#define Glex_brackets		PL_lex_brackets
-#define Glex_brackstack		PL_lex_brackstack
-#define Glex_casemods		PL_lex_casemods
-#define Glex_casestack		PL_lex_casestack
-#define Glex_defer		PL_lex_defer
-#define Glex_dojoin		PL_lex_dojoin
-#define Glex_expect		PL_lex_expect
-#define Glex_fakebrack		PL_lex_fakebrack
-#define Glex_formbrack		PL_lex_formbrack
-#define Glex_inpat		PL_lex_inpat
-#define Glex_inwhat		PL_lex_inwhat
-#define Glex_op			PL_lex_op
-#define Glex_repl		PL_lex_repl
-#define Glex_starts		PL_lex_starts
-#define Glex_state		PL_lex_state
-#define Glex_stuff		PL_lex_stuff
-#define Glinestr		PL_linestr
-#define Gmalloc_mutex		PL_malloc_mutex
-#define Gmax_intro_pending	PL_max_intro_pending
-#define Gmaxo			PL_maxo
-#define Gmin_intro_pending	PL_min_intro_pending
-#define Gmulti_close		PL_multi_close
-#define Gmulti_end		PL_multi_end
-#define Gmulti_open		PL_multi_open
-#define Gmulti_start		PL_multi_start
-#define Gna			PL_na
-#define Gnexttoke		PL_nexttoke
-#define Gnexttype		PL_nexttype
-#define Gnextval		PL_nextval
-#define Gnice_chunk		PL_nice_chunk
-#define Gnice_chunk_size	PL_nice_chunk_size
-#define Gninterps		PL_ninterps
-#define Gnomemok		PL_nomemok
-#define Gnthreads		PL_nthreads
-#define Gnthreads_cond		PL_nthreads_cond
-#define Gnumeric_local		PL_numeric_local
-#define Gnumeric_name		PL_numeric_name
-#define Gnumeric_standard	PL_numeric_standard
-#define Goldbufptr		PL_oldbufptr
-#define Goldoldbufptr		PL_oldoldbufptr
-#define Gop_seqmax		PL_op_seqmax
-#define Gorigalen		PL_origalen
-#define Gorigenviron		PL_origenviron
-#define Gosname			PL_osname
-#define Gpad_reset_pending	PL_pad_reset_pending
-#define Gpadix			PL_padix
-#define Gpadix_floor		PL_padix_floor
-#define Gpatleave		PL_patleave
-#define Gpidstatus		PL_pidstatus
-#define Grunops			PL_runops
-#define Gsh_path		PL_sh_path
-#define Gsighandlerp		PL_sighandlerp
-#define Gspecialsv_list		PL_specialsv_list
-#define Gsubline		PL_subline
-#define Gsubname		PL_subname
-#define Gsv_mutex		PL_sv_mutex
-#define Gsv_no			PL_sv_no
-#define Gsv_undef		PL_sv_undef
-#define Gsv_yes			PL_sv_yes
-#define Gsvref_mutex		PL_svref_mutex
-#define Gthisexpr		PL_thisexpr
-#define Gthr_key		PL_thr_key
-#define Gthreads_mutex		PL_threads_mutex
-#define Gthreadsv_names		PL_threadsv_names
-#define Gtokenbuf		PL_tokenbuf
-#define Guid			PL_uid
-#define Gxiv_arenaroot		PL_xiv_arenaroot
-#define Gxiv_root		PL_xiv_root
-#define Gxnv_root		PL_xnv_root
-#define Gxpv_root		PL_xpv_root
-#define Gxrv_root		PL_xrv_root
+#define PL_GNo			PL_No
+#define PL_GYes			PL_Yes
+#define PL_Gamagic_generation	PL_amagic_generation
+#define PL_Gan			PL_an
+#define PL_Gbufend		PL_bufend
+#define PL_Gbufptr		PL_bufptr
+#define PL_Gcollation_ix	PL_collation_ix
+#define PL_Gcollation_name	PL_collation_name
+#define PL_Gcollation_standard	PL_collation_standard
+#define PL_Gcollxfrm_base	PL_collxfrm_base
+#define PL_Gcollxfrm_mult	PL_collxfrm_mult
+#define PL_Gcop_seqmax		PL_cop_seqmax
+#define PL_Gcryptseen		PL_cryptseen
+#define PL_Gcshlen		PL_cshlen
+#define PL_Gcshname		PL_cshname
+#define PL_Gcurinterp		PL_curinterp
+#define PL_Gcurthr		PL_curthr
+#define PL_Gdebug		PL_debug
+#define PL_Gdo_undump		PL_do_undump
+#define PL_Gegid		PL_egid
+#define PL_Gerror_count		PL_error_count
+#define PL_Geuid		PL_euid
+#define PL_Geval_cond		PL_eval_cond
+#define PL_Geval_mutex		PL_eval_mutex
+#define PL_Geval_owner		PL_eval_owner
+#define PL_Gevalseq		PL_evalseq
+#define PL_Gexpect		PL_expect
+#define PL_Ggid			PL_gid
+#define PL_Ghe_root		PL_he_root
+#define PL_Ghexdigit		PL_hexdigit
+#define PL_Ghints		PL_hints
+#define PL_Gin_my		PL_in_my
+#define PL_Gin_my_stash		PL_in_my_stash
+#define PL_Glast_lop		PL_last_lop
+#define PL_Glast_lop_op		PL_last_lop_op
+#define PL_Glast_uni		PL_last_uni
+#define PL_Glex_brackets	PL_lex_brackets
+#define PL_Glex_brackstack	PL_lex_brackstack
+#define PL_Glex_casemods	PL_lex_casemods
+#define PL_Glex_casestack	PL_lex_casestack
+#define PL_Glex_defer		PL_lex_defer
+#define PL_Glex_dojoin		PL_lex_dojoin
+#define PL_Glex_expect		PL_lex_expect
+#define PL_Glex_fakebrack	PL_lex_fakebrack
+#define PL_Glex_formbrack	PL_lex_formbrack
+#define PL_Glex_inpat		PL_lex_inpat
+#define PL_Glex_inwhat		PL_lex_inwhat
+#define PL_Glex_op		PL_lex_op
+#define PL_Glex_repl		PL_lex_repl
+#define PL_Glex_starts		PL_lex_starts
+#define PL_Glex_state		PL_lex_state
+#define PL_Glex_stuff		PL_lex_stuff
+#define PL_Glinestr		PL_linestr
+#define PL_Gmalloc_mutex	PL_malloc_mutex
+#define PL_Gmax_intro_pending	PL_max_intro_pending
+#define PL_Gmaxo		PL_maxo
+#define PL_Gmin_intro_pending	PL_min_intro_pending
+#define PL_Gmulti_close		PL_multi_close
+#define PL_Gmulti_end		PL_multi_end
+#define PL_Gmulti_open		PL_multi_open
+#define PL_Gmulti_start		PL_multi_start
+#define PL_Gna			PL_na
+#define PL_Gnexttoke		PL_nexttoke
+#define PL_Gnexttype		PL_nexttype
+#define PL_Gnextval		PL_nextval
+#define PL_Gnice_chunk		PL_nice_chunk
+#define PL_Gnice_chunk_size	PL_nice_chunk_size
+#define PL_Gninterps		PL_ninterps
+#define PL_Gnomemok		PL_nomemok
+#define PL_Gnthreads		PL_nthreads
+#define PL_Gnthreads_cond	PL_nthreads_cond
+#define PL_Gnumeric_local	PL_numeric_local
+#define PL_Gnumeric_name	PL_numeric_name
+#define PL_Gnumeric_standard	PL_numeric_standard
+#define PL_Goldbufptr		PL_oldbufptr
+#define PL_Goldoldbufptr	PL_oldoldbufptr
+#define PL_Gop_seqmax		PL_op_seqmax
+#define PL_Gorigalen		PL_origalen
+#define PL_Gorigenviron		PL_origenviron
+#define PL_Gosname		PL_osname
+#define PL_Gpad_reset_pending	PL_pad_reset_pending
+#define PL_Gpadix		PL_padix
+#define PL_Gpadix_floor		PL_padix_floor
+#define PL_Gpatleave		PL_patleave
+#define PL_Gpidstatus		PL_pidstatus
+#define PL_Grunops		PL_runops
+#define PL_Gsh_path		PL_sh_path
+#define PL_Gsighandlerp		PL_sighandlerp
+#define PL_Gspecialsv_list	PL_specialsv_list
+#define PL_Gsubline		PL_subline
+#define PL_Gsubname		PL_subname
+#define PL_Gsv_mutex		PL_sv_mutex
+#define PL_Gsv_no		PL_sv_no
+#define PL_Gsv_undef		PL_sv_undef
+#define PL_Gsv_yes		PL_sv_yes
+#define PL_Gsvref_mutex		PL_svref_mutex
+#define PL_Gthisexpr		PL_thisexpr
+#define PL_Gthr_key		PL_thr_key
+#define PL_Gthreads_mutex	PL_threads_mutex
+#define PL_Gthreadsv_names	PL_threadsv_names
+#define PL_Gtokenbuf		PL_tokenbuf
+#define PL_Guid			PL_uid
+#define PL_Gxiv_arenaroot	PL_xiv_arenaroot
+#define PL_Gxiv_root		PL_xiv_root
+#define PL_Gxnv_root		PL_xnv_root
+#define PL_Gxpv_root		PL_xpv_root
+#define PL_Gxrv_root		PL_xrv_root
 
 #ifdef EMBED