source: trunk/third/perl/embedvar.h @ 18450

Revision 18450, 57.0 KB checked in by zacheiss, 21 years ago (diff)
This commit was generated by cvs2svn to compensate for changes in r18449, which included commits to RCS files with non-trunk default branches.
Line 
1/*
2 *    embedvar.h
3 *
4 *    Copyright (c) 1997-2002, Larry Wall
5 *
6 *    You may distribute under the terms of either the GNU General Public
7 *    License or the Artistic License, as specified in the README file.
8 *
9 *
10 * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
11 *  This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h,
12 *  perlvars.h and thrdvar.h.  Any changes made here will be lost!
13 */
14
15/* (Doing namespace management portably in C is really gross.) */
16
17/*
18   The following combinations of MULTIPLICITY, USE_5005THREADS
19   and PERL_IMPLICIT_CONTEXT are supported:
20     1) none
21     2) MULTIPLICITY    # supported for compatibility
22     3) MULTIPLICITY && PERL_IMPLICIT_CONTEXT
23     4) USE_5005THREADS && PERL_IMPLICIT_CONTEXT
24     5) MULTIPLICITY && USE_5005THREADS && PERL_IMPLICIT_CONTEXT
25
26   All other combinations of these flags are errors.
27
28   #3, #4, #5, and #6 are supported directly, while #2 is a special
29   case of #3 (supported by redefining vTHX appropriately).
30*/
31
32#if defined(MULTIPLICITY)
33/* cases 2, 3 and 5 above */
34
35#  if defined(PERL_IMPLICIT_CONTEXT)
36#    define vTHX        aTHX
37#  else
38#    define vTHX        PERL_GET_INTERP
39#  endif
40
41#define PL_Sv                   (vTHX->TSv)
42#define PL_Xpv                  (vTHX->TXpv)
43#define PL_av_fetch_sv          (vTHX->Tav_fetch_sv)
44#define PL_bodytarget           (vTHX->Tbodytarget)
45#define PL_bostr                (vTHX->Tbostr)
46#define PL_chopset              (vTHX->Tchopset)
47#define PL_colors               (vTHX->Tcolors)
48#define PL_colorset             (vTHX->Tcolorset)
49#define PL_curcop               (vTHX->Tcurcop)
50#define PL_curpad               (vTHX->Tcurpad)
51#define PL_curpm                (vTHX->Tcurpm)
52#define PL_curstack             (vTHX->Tcurstack)
53#define PL_curstackinfo         (vTHX->Tcurstackinfo)
54#define PL_curstash             (vTHX->Tcurstash)
55#define PL_defoutgv             (vTHX->Tdefoutgv)
56#define PL_defstash             (vTHX->Tdefstash)
57#define PL_delaymagic           (vTHX->Tdelaymagic)
58#define PL_dirty                (vTHX->Tdirty)
59#define PL_dumpindent           (vTHX->Tdumpindent)
60#define PL_efloatbuf            (vTHX->Tefloatbuf)
61#define PL_efloatsize           (vTHX->Tefloatsize)
62#define PL_errors               (vTHX->Terrors)
63#define PL_extralen             (vTHX->Textralen)
64#define PL_firstgv              (vTHX->Tfirstgv)
65#define PL_formtarget           (vTHX->Tformtarget)
66#define PL_hv_fetch_ent_mh      (vTHX->Thv_fetch_ent_mh)
67#define PL_hv_fetch_sv          (vTHX->Thv_fetch_sv)
68#define PL_in_eval              (vTHX->Tin_eval)
69#define PL_last_in_gv           (vTHX->Tlast_in_gv)
70#define PL_lastgotoprobe        (vTHX->Tlastgotoprobe)
71#define PL_lastscream           (vTHX->Tlastscream)
72#define PL_localizing           (vTHX->Tlocalizing)
73#define PL_mainstack            (vTHX->Tmainstack)
74#define PL_markstack            (vTHX->Tmarkstack)
75#define PL_markstack_max        (vTHX->Tmarkstack_max)
76#define PL_markstack_ptr        (vTHX->Tmarkstack_ptr)
77#define PL_maxscream            (vTHX->Tmaxscream)
78#define PL_modcount             (vTHX->Tmodcount)
79#define PL_na                   (vTHX->Tna)
80#define PL_nrs                  (vTHX->Tnrs)
81#define PL_ofs_sv               (vTHX->Tofs_sv)
82#define PL_op                   (vTHX->Top)
83#define PL_opsave               (vTHX->Topsave)
84#define PL_peepp                (vTHX->Tpeepp)
85#define PL_protect              (vTHX->Tprotect)
86#define PL_reg_call_cc          (vTHX->Treg_call_cc)
87#define PL_reg_curpm            (vTHX->Treg_curpm)
88#define PL_reg_eval_set         (vTHX->Treg_eval_set)
89#define PL_reg_flags            (vTHX->Treg_flags)
90#define PL_reg_ganch            (vTHX->Treg_ganch)
91#define PL_reg_leftiter         (vTHX->Treg_leftiter)
92#define PL_reg_magic            (vTHX->Treg_magic)
93#define PL_reg_match_utf8       (vTHX->Treg_match_utf8)
94#define PL_reg_maxiter          (vTHX->Treg_maxiter)
95#define PL_reg_oldcurpm         (vTHX->Treg_oldcurpm)
96#define PL_reg_oldpos           (vTHX->Treg_oldpos)
97#define PL_reg_oldsaved         (vTHX->Treg_oldsaved)
98#define PL_reg_oldsavedlen      (vTHX->Treg_oldsavedlen)
99#define PL_reg_poscache         (vTHX->Treg_poscache)
100#define PL_reg_poscache_size    (vTHX->Treg_poscache_size)
101#define PL_reg_re               (vTHX->Treg_re)
102#define PL_reg_start_tmp        (vTHX->Treg_start_tmp)
103#define PL_reg_start_tmpl       (vTHX->Treg_start_tmpl)
104#define PL_reg_starttry         (vTHX->Treg_starttry)
105#define PL_reg_sv               (vTHX->Treg_sv)
106#define PL_reg_whilem_seen      (vTHX->Treg_whilem_seen)
107#define PL_regbol               (vTHX->Tregbol)
108#define PL_regcc                (vTHX->Tregcc)
109#define PL_regcode              (vTHX->Tregcode)
110#define PL_regcomp_parse        (vTHX->Tregcomp_parse)
111#define PL_regcomp_rx           (vTHX->Tregcomp_rx)
112#define PL_regcompat1           (vTHX->Tregcompat1)
113#define PL_regcompp             (vTHX->Tregcompp)
114#define PL_regdata              (vTHX->Tregdata)
115#define PL_regdummy             (vTHX->Tregdummy)
116#define PL_regendp              (vTHX->Tregendp)
117#define PL_regeol               (vTHX->Tregeol)
118#define PL_regexecp             (vTHX->Tregexecp)
119#define PL_regflags             (vTHX->Tregflags)
120#define PL_regfree              (vTHX->Tregfree)
121#define PL_regindent            (vTHX->Tregindent)
122#define PL_reginput             (vTHX->Treginput)
123#define PL_regint_start         (vTHX->Tregint_start)
124#define PL_regint_string        (vTHX->Tregint_string)
125#define PL_reginterp_cnt        (vTHX->Treginterp_cnt)
126#define PL_reglastcloseparen    (vTHX->Treglastcloseparen)
127#define PL_reglastparen         (vTHX->Treglastparen)
128#define PL_regnarrate           (vTHX->Tregnarrate)
129#define PL_regnaughty           (vTHX->Tregnaughty)
130#define PL_regnpar              (vTHX->Tregnpar)
131#define PL_regprecomp           (vTHX->Tregprecomp)
132#define PL_regprogram           (vTHX->Tregprogram)
133#define PL_regsawback           (vTHX->Tregsawback)
134#define PL_regseen              (vTHX->Tregseen)
135#define PL_regsize              (vTHX->Tregsize)
136#define PL_regstartp            (vTHX->Tregstartp)
137#define PL_regtill              (vTHX->Tregtill)
138#define PL_regxend              (vTHX->Tregxend)
139#define PL_restartop            (vTHX->Trestartop)
140#define PL_retstack             (vTHX->Tretstack)
141#define PL_retstack_ix          (vTHX->Tretstack_ix)
142#define PL_retstack_max         (vTHX->Tretstack_max)
143#define PL_rs                   (vTHX->Trs)
144#define PL_savestack            (vTHX->Tsavestack)
145#define PL_savestack_ix         (vTHX->Tsavestack_ix)
146#define PL_savestack_max        (vTHX->Tsavestack_max)
147#define PL_scopestack           (vTHX->Tscopestack)
148#define PL_scopestack_ix        (vTHX->Tscopestack_ix)
149#define PL_scopestack_max       (vTHX->Tscopestack_max)
150#define PL_screamfirst          (vTHX->Tscreamfirst)
151#define PL_screamnext           (vTHX->Tscreamnext)
152#define PL_secondgv             (vTHX->Tsecondgv)
153#define PL_seen_evals           (vTHX->Tseen_evals)
154#define PL_seen_zerolen         (vTHX->Tseen_zerolen)
155#define PL_sortcop              (vTHX->Tsortcop)
156#define PL_sortcxix             (vTHX->Tsortcxix)
157#define PL_sortstash            (vTHX->Tsortstash)
158#define PL_stack_base           (vTHX->Tstack_base)
159#define PL_stack_max            (vTHX->Tstack_max)
160#define PL_stack_sp             (vTHX->Tstack_sp)
161#define PL_start_env            (vTHX->Tstart_env)
162#define PL_statbuf              (vTHX->Tstatbuf)
163#define PL_statcache            (vTHX->Tstatcache)
164#define PL_statgv               (vTHX->Tstatgv)
165#define PL_statname             (vTHX->Tstatname)
166#define PL_tainted              (vTHX->Ttainted)
167#define PL_timesbuf             (vTHX->Ttimesbuf)
168#define PL_tmps_floor           (vTHX->Ttmps_floor)
169#define PL_tmps_ix              (vTHX->Ttmps_ix)
170#define PL_tmps_max             (vTHX->Ttmps_max)
171#define PL_tmps_stack           (vTHX->Ttmps_stack)
172#define PL_top_env              (vTHX->Ttop_env)
173#define PL_toptarget            (vTHX->Ttoptarget)
174#define PL_watchaddr            (vTHX->Twatchaddr)
175#define PL_watchok              (vTHX->Twatchok)
176
177#  if defined(USE_5005THREADS)
178/* case 5 above */
179
180#define PL_Argv                 (PERL_GET_INTERP->IArgv)
181#define PL_Cmd                  (PERL_GET_INTERP->ICmd)
182#define PL_DBcv                 (PERL_GET_INTERP->IDBcv)
183#define PL_DBgv                 (PERL_GET_INTERP->IDBgv)
184#define PL_DBline               (PERL_GET_INTERP->IDBline)
185#define PL_DBsignal             (PERL_GET_INTERP->IDBsignal)
186#define PL_DBsingle             (PERL_GET_INTERP->IDBsingle)
187#define PL_DBsub                (PERL_GET_INTERP->IDBsub)
188#define PL_DBtrace              (PERL_GET_INTERP->IDBtrace)
189#define PL_Dir                  (PERL_GET_INTERP->IDir)
190#define PL_Env                  (PERL_GET_INTERP->IEnv)
191#define PL_LIO                  (PERL_GET_INTERP->ILIO)
192#define PL_Mem                  (PERL_GET_INTERP->IMem)
193#define PL_MemParse             (PERL_GET_INTERP->IMemParse)
194#define PL_MemShared            (PERL_GET_INTERP->IMemShared)
195#define PL_OpPtr                (PERL_GET_INTERP->IOpPtr)
196#define PL_OpSlab               (PERL_GET_INTERP->IOpSlab)
197#define PL_OpSpace              (PERL_GET_INTERP->IOpSpace)
198#define PL_Proc                 (PERL_GET_INTERP->IProc)
199#define PL_Sock                 (PERL_GET_INTERP->ISock)
200#define PL_StdIO                (PERL_GET_INTERP->IStdIO)
201#define PL_amagic_generation    (PERL_GET_INTERP->Iamagic_generation)
202#define PL_an                   (PERL_GET_INTERP->Ian)
203#define PL_argvgv               (PERL_GET_INTERP->Iargvgv)
204#define PL_argvout_stack        (PERL_GET_INTERP->Iargvout_stack)
205#define PL_argvoutgv            (PERL_GET_INTERP->Iargvoutgv)
206#define PL_basetime             (PERL_GET_INTERP->Ibasetime)
207#define PL_beginav              (PERL_GET_INTERP->Ibeginav)
208#define PL_beginav_save         (PERL_GET_INTERP->Ibeginav_save)
209#define PL_bitcount             (PERL_GET_INTERP->Ibitcount)
210#define PL_bufend               (PERL_GET_INTERP->Ibufend)
211#define PL_bufptr               (PERL_GET_INTERP->Ibufptr)
212#define PL_checkav              (PERL_GET_INTERP->Icheckav)
213#define PL_collation_ix         (PERL_GET_INTERP->Icollation_ix)
214#define PL_collation_name       (PERL_GET_INTERP->Icollation_name)
215#define PL_collation_standard   (PERL_GET_INTERP->Icollation_standard)
216#define PL_collxfrm_base        (PERL_GET_INTERP->Icollxfrm_base)
217#define PL_collxfrm_mult        (PERL_GET_INTERP->Icollxfrm_mult)
218#define PL_compcv               (PERL_GET_INTERP->Icompcv)
219#define PL_compiling            (PERL_GET_INTERP->Icompiling)
220#define PL_comppad              (PERL_GET_INTERP->Icomppad)
221#define PL_comppad_name         (PERL_GET_INTERP->Icomppad_name)
222#define PL_comppad_name_fill    (PERL_GET_INTERP->Icomppad_name_fill)
223#define PL_comppad_name_floor   (PERL_GET_INTERP->Icomppad_name_floor)
224#define PL_cop_seqmax           (PERL_GET_INTERP->Icop_seqmax)
225#define PL_copline              (PERL_GET_INTERP->Icopline)
226#define PL_cred_mutex           (PERL_GET_INTERP->Icred_mutex)
227#define PL_cryptseen            (PERL_GET_INTERP->Icryptseen)
228#define PL_cshlen               (PERL_GET_INTERP->Icshlen)
229#define PL_cshname              (PERL_GET_INTERP->Icshname)
230#define PL_curcopdb             (PERL_GET_INTERP->Icurcopdb)
231#define PL_curstname            (PERL_GET_INTERP->Icurstname)
232#define PL_curthr               (PERL_GET_INTERP->Icurthr)
233#define PL_custom_op_descs      (PERL_GET_INTERP->Icustom_op_descs)
234#define PL_custom_op_names      (PERL_GET_INTERP->Icustom_op_names)
235#define PL_dbargs               (PERL_GET_INTERP->Idbargs)
236#define PL_debstash             (PERL_GET_INTERP->Idebstash)
237#define PL_debug                (PERL_GET_INTERP->Idebug)
238#define PL_debug_pad            (PERL_GET_INTERP->Idebug_pad)
239#define PL_def_layerlist        (PERL_GET_INTERP->Idef_layerlist)
240#define PL_defgv                (PERL_GET_INTERP->Idefgv)
241#define PL_diehook              (PERL_GET_INTERP->Idiehook)
242#define PL_doextract            (PERL_GET_INTERP->Idoextract)
243#define PL_doswitches           (PERL_GET_INTERP->Idoswitches)
244#define PL_dowarn               (PERL_GET_INTERP->Idowarn)
245#define PL_e_script             (PERL_GET_INTERP->Ie_script)
246#define PL_egid                 (PERL_GET_INTERP->Iegid)
247#define PL_encoding             (PERL_GET_INTERP->Iencoding)
248#define PL_endav                (PERL_GET_INTERP->Iendav)
249#define PL_envgv                (PERL_GET_INTERP->Ienvgv)
250#define PL_errgv                (PERL_GET_INTERP->Ierrgv)
251#define PL_error_count          (PERL_GET_INTERP->Ierror_count)
252#define PL_euid                 (PERL_GET_INTERP->Ieuid)
253#define PL_eval_cond            (PERL_GET_INTERP->Ieval_cond)
254#define PL_eval_mutex           (PERL_GET_INTERP->Ieval_mutex)
255#define PL_eval_owner           (PERL_GET_INTERP->Ieval_owner)
256#define PL_eval_root            (PERL_GET_INTERP->Ieval_root)
257#define PL_eval_start           (PERL_GET_INTERP->Ieval_start)
258#define PL_evalseq              (PERL_GET_INTERP->Ievalseq)
259#define PL_exit_flags           (PERL_GET_INTERP->Iexit_flags)
260#define PL_exitlist             (PERL_GET_INTERP->Iexitlist)
261#define PL_exitlistlen          (PERL_GET_INTERP->Iexitlistlen)
262#define PL_expect               (PERL_GET_INTERP->Iexpect)
263#define PL_fdpid                (PERL_GET_INTERP->Ifdpid)
264#define PL_fdpid_mutex          (PERL_GET_INTERP->Ifdpid_mutex)
265#define PL_filemode             (PERL_GET_INTERP->Ifilemode)
266#define PL_forkprocess          (PERL_GET_INTERP->Iforkprocess)
267#define PL_formfeed             (PERL_GET_INTERP->Iformfeed)
268#define PL_generation           (PERL_GET_INTERP->Igeneration)
269#define PL_gensym               (PERL_GET_INTERP->Igensym)
270#define PL_gid                  (PERL_GET_INTERP->Igid)
271#define PL_glob_index           (PERL_GET_INTERP->Iglob_index)
272#define PL_globalstash          (PERL_GET_INTERP->Iglobalstash)
273#define PL_he_arenaroot         (PERL_GET_INTERP->Ihe_arenaroot)
274#define PL_he_root              (PERL_GET_INTERP->Ihe_root)
275#define PL_hintgv               (PERL_GET_INTERP->Ihintgv)
276#define PL_hints                (PERL_GET_INTERP->Ihints)
277#define PL_in_clean_all         (PERL_GET_INTERP->Iin_clean_all)
278#define PL_in_clean_objs        (PERL_GET_INTERP->Iin_clean_objs)
279#define PL_in_my                (PERL_GET_INTERP->Iin_my)
280#define PL_in_my_stash          (PERL_GET_INTERP->Iin_my_stash)
281#define PL_incgv                (PERL_GET_INTERP->Iincgv)
282#define PL_initav               (PERL_GET_INTERP->Iinitav)
283#define PL_inplace              (PERL_GET_INTERP->Iinplace)
284#define PL_known_layers         (PERL_GET_INTERP->Iknown_layers)
285#define PL_last_lop             (PERL_GET_INTERP->Ilast_lop)
286#define PL_last_lop_op          (PERL_GET_INTERP->Ilast_lop_op)
287#define PL_last_swash_hv        (PERL_GET_INTERP->Ilast_swash_hv)
288#define PL_last_swash_key       (PERL_GET_INTERP->Ilast_swash_key)
289#define PL_last_swash_klen      (PERL_GET_INTERP->Ilast_swash_klen)
290#define PL_last_swash_slen      (PERL_GET_INTERP->Ilast_swash_slen)
291#define PL_last_swash_tmps      (PERL_GET_INTERP->Ilast_swash_tmps)
292#define PL_last_uni             (PERL_GET_INTERP->Ilast_uni)
293#define PL_lastfd               (PERL_GET_INTERP->Ilastfd)
294#define PL_laststatval          (PERL_GET_INTERP->Ilaststatval)
295#define PL_laststype            (PERL_GET_INTERP->Ilaststype)
296#define PL_lex_brackets         (PERL_GET_INTERP->Ilex_brackets)
297#define PL_lex_brackstack       (PERL_GET_INTERP->Ilex_brackstack)
298#define PL_lex_casemods         (PERL_GET_INTERP->Ilex_casemods)
299#define PL_lex_casestack        (PERL_GET_INTERP->Ilex_casestack)
300#define PL_lex_defer            (PERL_GET_INTERP->Ilex_defer)
301#define PL_lex_dojoin           (PERL_GET_INTERP->Ilex_dojoin)
302#define PL_lex_expect           (PERL_GET_INTERP->Ilex_expect)
303#define PL_lex_formbrack        (PERL_GET_INTERP->Ilex_formbrack)
304#define PL_lex_inpat            (PERL_GET_INTERP->Ilex_inpat)
305#define PL_lex_inwhat           (PERL_GET_INTERP->Ilex_inwhat)
306#define PL_lex_op               (PERL_GET_INTERP->Ilex_op)
307#define PL_lex_repl             (PERL_GET_INTERP->Ilex_repl)
308#define PL_lex_starts           (PERL_GET_INTERP->Ilex_starts)
309#define PL_lex_state            (PERL_GET_INTERP->Ilex_state)
310#define PL_lex_stuff            (PERL_GET_INTERP->Ilex_stuff)
311#define PL_lineary              (PERL_GET_INTERP->Ilineary)
312#define PL_linestart            (PERL_GET_INTERP->Ilinestart)
313#define PL_linestr              (PERL_GET_INTERP->Ilinestr)
314#define PL_localpatches         (PERL_GET_INTERP->Ilocalpatches)
315#define PL_main_cv              (PERL_GET_INTERP->Imain_cv)
316#define PL_main_root            (PERL_GET_INTERP->Imain_root)
317#define PL_main_start           (PERL_GET_INTERP->Imain_start)
318#define PL_max_intro_pending    (PERL_GET_INTERP->Imax_intro_pending)
319#define PL_maxo                 (PERL_GET_INTERP->Imaxo)
320#define PL_maxsysfd             (PERL_GET_INTERP->Imaxsysfd)
321#define PL_mess_sv              (PERL_GET_INTERP->Imess_sv)
322#define PL_min_intro_pending    (PERL_GET_INTERP->Imin_intro_pending)
323#define PL_minus_F              (PERL_GET_INTERP->Iminus_F)
324#define PL_minus_a              (PERL_GET_INTERP->Iminus_a)
325#define PL_minus_c              (PERL_GET_INTERP->Iminus_c)
326#define PL_minus_l              (PERL_GET_INTERP->Iminus_l)
327#define PL_minus_n              (PERL_GET_INTERP->Iminus_n)
328#define PL_minus_p              (PERL_GET_INTERP->Iminus_p)
329#define PL_modglobal            (PERL_GET_INTERP->Imodglobal)
330#define PL_multi_close          (PERL_GET_INTERP->Imulti_close)
331#define PL_multi_end            (PERL_GET_INTERP->Imulti_end)
332#define PL_multi_open           (PERL_GET_INTERP->Imulti_open)
333#define PL_multi_start          (PERL_GET_INTERP->Imulti_start)
334#define PL_multiline            (PERL_GET_INTERP->Imultiline)
335#define PL_nexttoke             (PERL_GET_INTERP->Inexttoke)
336#define PL_nexttype             (PERL_GET_INTERP->Inexttype)
337#define PL_nextval              (PERL_GET_INTERP->Inextval)
338#define PL_nice_chunk           (PERL_GET_INTERP->Inice_chunk)
339#define PL_nice_chunk_size      (PERL_GET_INTERP->Inice_chunk_size)
340#define PL_nomemok              (PERL_GET_INTERP->Inomemok)
341#define PL_nthreads             (PERL_GET_INTERP->Inthreads)
342#define PL_nthreads_cond        (PERL_GET_INTERP->Inthreads_cond)
343#define PL_nullstash            (PERL_GET_INTERP->Inullstash)
344#define PL_numeric_compat1      (PERL_GET_INTERP->Inumeric_compat1)
345#define PL_numeric_local        (PERL_GET_INTERP->Inumeric_local)
346#define PL_numeric_name         (PERL_GET_INTERP->Inumeric_name)
347#define PL_numeric_radix_sv     (PERL_GET_INTERP->Inumeric_radix_sv)
348#define PL_numeric_standard     (PERL_GET_INTERP->Inumeric_standard)
349#define PL_ofmt                 (PERL_GET_INTERP->Iofmt)
350#define PL_oldbufptr            (PERL_GET_INTERP->Ioldbufptr)
351#define PL_oldname              (PERL_GET_INTERP->Ioldname)
352#define PL_oldoldbufptr         (PERL_GET_INTERP->Ioldoldbufptr)
353#define PL_op_mask              (PERL_GET_INTERP->Iop_mask)
354#define PL_op_seqmax            (PERL_GET_INTERP->Iop_seqmax)
355#define PL_origalen             (PERL_GET_INTERP->Iorigalen)
356#define PL_origargc             (PERL_GET_INTERP->Iorigargc)
357#define PL_origargv             (PERL_GET_INTERP->Iorigargv)
358#define PL_origenviron          (PERL_GET_INTERP->Iorigenviron)
359#define PL_origfilename         (PERL_GET_INTERP->Iorigfilename)
360#define PL_ors_sv               (PERL_GET_INTERP->Iors_sv)
361#define PL_osname               (PERL_GET_INTERP->Iosname)
362#define PL_pad_reset_pending    (PERL_GET_INTERP->Ipad_reset_pending)
363#define PL_padix                (PERL_GET_INTERP->Ipadix)
364#define PL_padix_floor          (PERL_GET_INTERP->Ipadix_floor)
365#define PL_patchlevel           (PERL_GET_INTERP->Ipatchlevel)
366#define PL_pending_ident        (PERL_GET_INTERP->Ipending_ident)
367#define PL_perl_destruct_level  (PERL_GET_INTERP->Iperl_destruct_level)
368#define PL_perldb               (PERL_GET_INTERP->Iperldb)
369#define PL_perlio               (PERL_GET_INTERP->Iperlio)
370#define PL_pidstatus            (PERL_GET_INTERP->Ipidstatus)
371#define PL_preambleav           (PERL_GET_INTERP->Ipreambleav)
372#define PL_preambled            (PERL_GET_INTERP->Ipreambled)
373#define PL_preprocess           (PERL_GET_INTERP->Ipreprocess)
374#define PL_profiledata          (PERL_GET_INTERP->Iprofiledata)
375#define PL_psig_name            (PERL_GET_INTERP->Ipsig_name)
376#define PL_psig_pend            (PERL_GET_INTERP->Ipsig_pend)
377#define PL_psig_ptr             (PERL_GET_INTERP->Ipsig_ptr)
378#define PL_ptr_table            (PERL_GET_INTERP->Iptr_table)
379#define PL_reentrant_buffer     (PERL_GET_INTERP->Ireentrant_buffer)
380#define PL_regex_pad            (PERL_GET_INTERP->Iregex_pad)
381#define PL_regex_padav          (PERL_GET_INTERP->Iregex_padav)
382#define PL_replgv               (PERL_GET_INTERP->Ireplgv)
383#define PL_rsfp                 (PERL_GET_INTERP->Irsfp)
384#define PL_rsfp_filters         (PERL_GET_INTERP->Irsfp_filters)
385#define PL_runops               (PERL_GET_INTERP->Irunops)
386#define PL_savebegin            (PERL_GET_INTERP->Isavebegin)
387#define PL_sawampersand         (PERL_GET_INTERP->Isawampersand)
388#define PL_sh_path              (PERL_GET_INTERP->Ish_path)
389#define PL_sig_pending          (PERL_GET_INTERP->Isig_pending)
390#define PL_sighandlerp          (PERL_GET_INTERP->Isighandlerp)
391#define PL_sort_RealCmp         (PERL_GET_INTERP->Isort_RealCmp)
392#define PL_splitstr             (PERL_GET_INTERP->Isplitstr)
393#define PL_srand_called         (PERL_GET_INTERP->Isrand_called)
394#define PL_statusvalue          (PERL_GET_INTERP->Istatusvalue)
395#define PL_statusvalue_vms      (PERL_GET_INTERP->Istatusvalue_vms)
396#define PL_stderrgv             (PERL_GET_INTERP->Istderrgv)
397#define PL_stdingv              (PERL_GET_INTERP->Istdingv)
398#define PL_strtab               (PERL_GET_INTERP->Istrtab)
399#define PL_strtab_mutex         (PERL_GET_INTERP->Istrtab_mutex)
400#define PL_sub_generation       (PERL_GET_INTERP->Isub_generation)
401#define PL_sublex_info          (PERL_GET_INTERP->Isublex_info)
402#define PL_subline              (PERL_GET_INTERP->Isubline)
403#define PL_subname              (PERL_GET_INTERP->Isubname)
404#define PL_sv_arenaroot         (PERL_GET_INTERP->Isv_arenaroot)
405#define PL_sv_count             (PERL_GET_INTERP->Isv_count)
406#define PL_sv_lock_mutex        (PERL_GET_INTERP->Isv_lock_mutex)
407#define PL_sv_mutex             (PERL_GET_INTERP->Isv_mutex)
408#define PL_sv_no                (PERL_GET_INTERP->Isv_no)
409#define PL_sv_objcount          (PERL_GET_INTERP->Isv_objcount)
410#define PL_sv_root              (PERL_GET_INTERP->Isv_root)
411#define PL_sv_undef             (PERL_GET_INTERP->Isv_undef)
412#define PL_sv_yes               (PERL_GET_INTERP->Isv_yes)
413#define PL_svref_mutex          (PERL_GET_INTERP->Isvref_mutex)
414#define PL_sys_intern           (PERL_GET_INTERP->Isys_intern)
415#define PL_taint_warn           (PERL_GET_INTERP->Itaint_warn)
416#define PL_tainting             (PERL_GET_INTERP->Itainting)
417#define PL_threadnum            (PERL_GET_INTERP->Ithreadnum)
418#define PL_threads_mutex        (PERL_GET_INTERP->Ithreads_mutex)
419#define PL_threadsv_names       (PERL_GET_INTERP->Ithreadsv_names)
420#define PL_thrsv                (PERL_GET_INTERP->Ithrsv)
421#define PL_tokenbuf             (PERL_GET_INTERP->Itokenbuf)
422#define PL_uid                  (PERL_GET_INTERP->Iuid)
423#define PL_unsafe               (PERL_GET_INTERP->Iunsafe)
424#define PL_utf8_alnum           (PERL_GET_INTERP->Iutf8_alnum)
425#define PL_utf8_alnumc          (PERL_GET_INTERP->Iutf8_alnumc)
426#define PL_utf8_alpha           (PERL_GET_INTERP->Iutf8_alpha)
427#define PL_utf8_ascii           (PERL_GET_INTERP->Iutf8_ascii)
428#define PL_utf8_cntrl           (PERL_GET_INTERP->Iutf8_cntrl)
429#define PL_utf8_digit           (PERL_GET_INTERP->Iutf8_digit)
430#define PL_utf8_graph           (PERL_GET_INTERP->Iutf8_graph)
431#define PL_utf8_idcont          (PERL_GET_INTERP->Iutf8_idcont)
432#define PL_utf8_idstart         (PERL_GET_INTERP->Iutf8_idstart)
433#define PL_utf8_lower           (PERL_GET_INTERP->Iutf8_lower)
434#define PL_utf8_mark            (PERL_GET_INTERP->Iutf8_mark)
435#define PL_utf8_print           (PERL_GET_INTERP->Iutf8_print)
436#define PL_utf8_punct           (PERL_GET_INTERP->Iutf8_punct)
437#define PL_utf8_space           (PERL_GET_INTERP->Iutf8_space)
438#define PL_utf8_tofold          (PERL_GET_INTERP->Iutf8_tofold)
439#define PL_utf8_tolower         (PERL_GET_INTERP->Iutf8_tolower)
440#define PL_utf8_totitle         (PERL_GET_INTERP->Iutf8_totitle)
441#define PL_utf8_toupper         (PERL_GET_INTERP->Iutf8_toupper)
442#define PL_utf8_upper           (PERL_GET_INTERP->Iutf8_upper)
443#define PL_utf8_xdigit          (PERL_GET_INTERP->Iutf8_xdigit)
444#define PL_uudmap               (PERL_GET_INTERP->Iuudmap)
445#define PL_wantutf8             (PERL_GET_INTERP->Iwantutf8)
446#define PL_warnhook             (PERL_GET_INTERP->Iwarnhook)
447#define PL_widesyscalls         (PERL_GET_INTERP->Iwidesyscalls)
448#define PL_xiv_arenaroot        (PERL_GET_INTERP->Ixiv_arenaroot)
449#define PL_xiv_root             (PERL_GET_INTERP->Ixiv_root)
450#define PL_xnv_arenaroot        (PERL_GET_INTERP->Ixnv_arenaroot)
451#define PL_xnv_root             (PERL_GET_INTERP->Ixnv_root)
452#define PL_xpv_arenaroot        (PERL_GET_INTERP->Ixpv_arenaroot)
453#define PL_xpv_root             (PERL_GET_INTERP->Ixpv_root)
454#define PL_xpvav_arenaroot      (PERL_GET_INTERP->Ixpvav_arenaroot)
455#define PL_xpvav_root           (PERL_GET_INTERP->Ixpvav_root)
456#define PL_xpvbm_arenaroot      (PERL_GET_INTERP->Ixpvbm_arenaroot)
457#define PL_xpvbm_root           (PERL_GET_INTERP->Ixpvbm_root)
458#define PL_xpvcv_arenaroot      (PERL_GET_INTERP->Ixpvcv_arenaroot)
459#define PL_xpvcv_root           (PERL_GET_INTERP->Ixpvcv_root)
460#define PL_xpvhv_arenaroot      (PERL_GET_INTERP->Ixpvhv_arenaroot)
461#define PL_xpvhv_root           (PERL_GET_INTERP->Ixpvhv_root)
462#define PL_xpviv_arenaroot      (PERL_GET_INTERP->Ixpviv_arenaroot)
463#define PL_xpviv_root           (PERL_GET_INTERP->Ixpviv_root)
464#define PL_xpvlv_arenaroot      (PERL_GET_INTERP->Ixpvlv_arenaroot)
465#define PL_xpvlv_root           (PERL_GET_INTERP->Ixpvlv_root)
466#define PL_xpvmg_arenaroot      (PERL_GET_INTERP->Ixpvmg_arenaroot)
467#define PL_xpvmg_root           (PERL_GET_INTERP->Ixpvmg_root)
468#define PL_xpvnv_arenaroot      (PERL_GET_INTERP->Ixpvnv_arenaroot)
469#define PL_xpvnv_root           (PERL_GET_INTERP->Ixpvnv_root)
470#define PL_xrv_arenaroot        (PERL_GET_INTERP->Ixrv_arenaroot)
471#define PL_xrv_root             (PERL_GET_INTERP->Ixrv_root)
472#define PL_yychar               (PERL_GET_INTERP->Iyychar)
473#define PL_yydebug              (PERL_GET_INTERP->Iyydebug)
474#define PL_yyerrflag            (PERL_GET_INTERP->Iyyerrflag)
475#define PL_yylval               (PERL_GET_INTERP->Iyylval)
476#define PL_yynerrs              (PERL_GET_INTERP->Iyynerrs)
477#define PL_yyval                (PERL_GET_INTERP->Iyyval)
478
479#  else         /* !USE_5005THREADS */
480/* cases 2 and 3 above */
481
482#define PL_Argv                 (vTHX->IArgv)
483#define PL_Cmd                  (vTHX->ICmd)
484#define PL_DBcv                 (vTHX->IDBcv)
485#define PL_DBgv                 (vTHX->IDBgv)
486#define PL_DBline               (vTHX->IDBline)
487#define PL_DBsignal             (vTHX->IDBsignal)
488#define PL_DBsingle             (vTHX->IDBsingle)
489#define PL_DBsub                (vTHX->IDBsub)
490#define PL_DBtrace              (vTHX->IDBtrace)
491#define PL_Dir                  (vTHX->IDir)
492#define PL_Env                  (vTHX->IEnv)
493#define PL_LIO                  (vTHX->ILIO)
494#define PL_Mem                  (vTHX->IMem)
495#define PL_MemParse             (vTHX->IMemParse)
496#define PL_MemShared            (vTHX->IMemShared)
497#define PL_OpPtr                (vTHX->IOpPtr)
498#define PL_OpSlab               (vTHX->IOpSlab)
499#define PL_OpSpace              (vTHX->IOpSpace)
500#define PL_Proc                 (vTHX->IProc)
501#define PL_Sock                 (vTHX->ISock)
502#define PL_StdIO                (vTHX->IStdIO)
503#define PL_amagic_generation    (vTHX->Iamagic_generation)
504#define PL_an                   (vTHX->Ian)
505#define PL_argvgv               (vTHX->Iargvgv)
506#define PL_argvout_stack        (vTHX->Iargvout_stack)
507#define PL_argvoutgv            (vTHX->Iargvoutgv)
508#define PL_basetime             (vTHX->Ibasetime)
509#define PL_beginav              (vTHX->Ibeginav)
510#define PL_beginav_save         (vTHX->Ibeginav_save)
511#define PL_bitcount             (vTHX->Ibitcount)
512#define PL_bufend               (vTHX->Ibufend)
513#define PL_bufptr               (vTHX->Ibufptr)
514#define PL_checkav              (vTHX->Icheckav)
515#define PL_collation_ix         (vTHX->Icollation_ix)
516#define PL_collation_name       (vTHX->Icollation_name)
517#define PL_collation_standard   (vTHX->Icollation_standard)
518#define PL_collxfrm_base        (vTHX->Icollxfrm_base)
519#define PL_collxfrm_mult        (vTHX->Icollxfrm_mult)
520#define PL_compcv               (vTHX->Icompcv)
521#define PL_compiling            (vTHX->Icompiling)
522#define PL_comppad              (vTHX->Icomppad)
523#define PL_comppad_name         (vTHX->Icomppad_name)
524#define PL_comppad_name_fill    (vTHX->Icomppad_name_fill)
525#define PL_comppad_name_floor   (vTHX->Icomppad_name_floor)
526#define PL_cop_seqmax           (vTHX->Icop_seqmax)
527#define PL_copline              (vTHX->Icopline)
528#define PL_cred_mutex           (vTHX->Icred_mutex)
529#define PL_cryptseen            (vTHX->Icryptseen)
530#define PL_cshlen               (vTHX->Icshlen)
531#define PL_cshname              (vTHX->Icshname)
532#define PL_curcopdb             (vTHX->Icurcopdb)
533#define PL_curstname            (vTHX->Icurstname)
534#define PL_curthr               (vTHX->Icurthr)
535#define PL_custom_op_descs      (vTHX->Icustom_op_descs)
536#define PL_custom_op_names      (vTHX->Icustom_op_names)
537#define PL_dbargs               (vTHX->Idbargs)
538#define PL_debstash             (vTHX->Idebstash)
539#define PL_debug                (vTHX->Idebug)
540#define PL_debug_pad            (vTHX->Idebug_pad)
541#define PL_def_layerlist        (vTHX->Idef_layerlist)
542#define PL_defgv                (vTHX->Idefgv)
543#define PL_diehook              (vTHX->Idiehook)
544#define PL_doextract            (vTHX->Idoextract)
545#define PL_doswitches           (vTHX->Idoswitches)
546#define PL_dowarn               (vTHX->Idowarn)
547#define PL_e_script             (vTHX->Ie_script)
548#define PL_egid                 (vTHX->Iegid)
549#define PL_encoding             (vTHX->Iencoding)
550#define PL_endav                (vTHX->Iendav)
551#define PL_envgv                (vTHX->Ienvgv)
552#define PL_errgv                (vTHX->Ierrgv)
553#define PL_error_count          (vTHX->Ierror_count)
554#define PL_euid                 (vTHX->Ieuid)
555#define PL_eval_cond            (vTHX->Ieval_cond)
556#define PL_eval_mutex           (vTHX->Ieval_mutex)
557#define PL_eval_owner           (vTHX->Ieval_owner)
558#define PL_eval_root            (vTHX->Ieval_root)
559#define PL_eval_start           (vTHX->Ieval_start)
560#define PL_evalseq              (vTHX->Ievalseq)
561#define PL_exit_flags           (vTHX->Iexit_flags)
562#define PL_exitlist             (vTHX->Iexitlist)
563#define PL_exitlistlen          (vTHX->Iexitlistlen)
564#define PL_expect               (vTHX->Iexpect)
565#define PL_fdpid                (vTHX->Ifdpid)
566#define PL_fdpid_mutex          (vTHX->Ifdpid_mutex)
567#define PL_filemode             (vTHX->Ifilemode)
568#define PL_forkprocess          (vTHX->Iforkprocess)
569#define PL_formfeed             (vTHX->Iformfeed)
570#define PL_generation           (vTHX->Igeneration)
571#define PL_gensym               (vTHX->Igensym)
572#define PL_gid                  (vTHX->Igid)
573#define PL_glob_index           (vTHX->Iglob_index)
574#define PL_globalstash          (vTHX->Iglobalstash)
575#define PL_he_arenaroot         (vTHX->Ihe_arenaroot)
576#define PL_he_root              (vTHX->Ihe_root)
577#define PL_hintgv               (vTHX->Ihintgv)
578#define PL_hints                (vTHX->Ihints)
579#define PL_in_clean_all         (vTHX->Iin_clean_all)
580#define PL_in_clean_objs        (vTHX->Iin_clean_objs)
581#define PL_in_my                (vTHX->Iin_my)
582#define PL_in_my_stash          (vTHX->Iin_my_stash)
583#define PL_incgv                (vTHX->Iincgv)
584#define PL_initav               (vTHX->Iinitav)
585#define PL_inplace              (vTHX->Iinplace)
586#define PL_known_layers         (vTHX->Iknown_layers)
587#define PL_last_lop             (vTHX->Ilast_lop)
588#define PL_last_lop_op          (vTHX->Ilast_lop_op)
589#define PL_last_swash_hv        (vTHX->Ilast_swash_hv)
590#define PL_last_swash_key       (vTHX->Ilast_swash_key)
591#define PL_last_swash_klen      (vTHX->Ilast_swash_klen)
592#define PL_last_swash_slen      (vTHX->Ilast_swash_slen)
593#define PL_last_swash_tmps      (vTHX->Ilast_swash_tmps)
594#define PL_last_uni             (vTHX->Ilast_uni)
595#define PL_lastfd               (vTHX->Ilastfd)
596#define PL_laststatval          (vTHX->Ilaststatval)
597#define PL_laststype            (vTHX->Ilaststype)
598#define PL_lex_brackets         (vTHX->Ilex_brackets)
599#define PL_lex_brackstack       (vTHX->Ilex_brackstack)
600#define PL_lex_casemods         (vTHX->Ilex_casemods)
601#define PL_lex_casestack        (vTHX->Ilex_casestack)
602#define PL_lex_defer            (vTHX->Ilex_defer)
603#define PL_lex_dojoin           (vTHX->Ilex_dojoin)
604#define PL_lex_expect           (vTHX->Ilex_expect)
605#define PL_lex_formbrack        (vTHX->Ilex_formbrack)
606#define PL_lex_inpat            (vTHX->Ilex_inpat)
607#define PL_lex_inwhat           (vTHX->Ilex_inwhat)
608#define PL_lex_op               (vTHX->Ilex_op)
609#define PL_lex_repl             (vTHX->Ilex_repl)
610#define PL_lex_starts           (vTHX->Ilex_starts)
611#define PL_lex_state            (vTHX->Ilex_state)
612#define PL_lex_stuff            (vTHX->Ilex_stuff)
613#define PL_lineary              (vTHX->Ilineary)
614#define PL_linestart            (vTHX->Ilinestart)
615#define PL_linestr              (vTHX->Ilinestr)
616#define PL_localpatches         (vTHX->Ilocalpatches)
617#define PL_main_cv              (vTHX->Imain_cv)
618#define PL_main_root            (vTHX->Imain_root)
619#define PL_main_start           (vTHX->Imain_start)
620#define PL_max_intro_pending    (vTHX->Imax_intro_pending)
621#define PL_maxo                 (vTHX->Imaxo)
622#define PL_maxsysfd             (vTHX->Imaxsysfd)
623#define PL_mess_sv              (vTHX->Imess_sv)
624#define PL_min_intro_pending    (vTHX->Imin_intro_pending)
625#define PL_minus_F              (vTHX->Iminus_F)
626#define PL_minus_a              (vTHX->Iminus_a)
627#define PL_minus_c              (vTHX->Iminus_c)
628#define PL_minus_l              (vTHX->Iminus_l)
629#define PL_minus_n              (vTHX->Iminus_n)
630#define PL_minus_p              (vTHX->Iminus_p)
631#define PL_modglobal            (vTHX->Imodglobal)
632#define PL_multi_close          (vTHX->Imulti_close)
633#define PL_multi_end            (vTHX->Imulti_end)
634#define PL_multi_open           (vTHX->Imulti_open)
635#define PL_multi_start          (vTHX->Imulti_start)
636#define PL_multiline            (vTHX->Imultiline)
637#define PL_nexttoke             (vTHX->Inexttoke)
638#define PL_nexttype             (vTHX->Inexttype)
639#define PL_nextval              (vTHX->Inextval)
640#define PL_nice_chunk           (vTHX->Inice_chunk)
641#define PL_nice_chunk_size      (vTHX->Inice_chunk_size)
642#define PL_nomemok              (vTHX->Inomemok)
643#define PL_nthreads             (vTHX->Inthreads)
644#define PL_nthreads_cond        (vTHX->Inthreads_cond)
645#define PL_nullstash            (vTHX->Inullstash)
646#define PL_numeric_compat1      (vTHX->Inumeric_compat1)
647#define PL_numeric_local        (vTHX->Inumeric_local)
648#define PL_numeric_name         (vTHX->Inumeric_name)
649#define PL_numeric_radix_sv     (vTHX->Inumeric_radix_sv)
650#define PL_numeric_standard     (vTHX->Inumeric_standard)
651#define PL_ofmt                 (vTHX->Iofmt)
652#define PL_oldbufptr            (vTHX->Ioldbufptr)
653#define PL_oldname              (vTHX->Ioldname)
654#define PL_oldoldbufptr         (vTHX->Ioldoldbufptr)
655#define PL_op_mask              (vTHX->Iop_mask)
656#define PL_op_seqmax            (vTHX->Iop_seqmax)
657#define PL_origalen             (vTHX->Iorigalen)
658#define PL_origargc             (vTHX->Iorigargc)
659#define PL_origargv             (vTHX->Iorigargv)
660#define PL_origenviron          (vTHX->Iorigenviron)
661#define PL_origfilename         (vTHX->Iorigfilename)
662#define PL_ors_sv               (vTHX->Iors_sv)
663#define PL_osname               (vTHX->Iosname)
664#define PL_pad_reset_pending    (vTHX->Ipad_reset_pending)
665#define PL_padix                (vTHX->Ipadix)
666#define PL_padix_floor          (vTHX->Ipadix_floor)
667#define PL_patchlevel           (vTHX->Ipatchlevel)
668#define PL_pending_ident        (vTHX->Ipending_ident)
669#define PL_perl_destruct_level  (vTHX->Iperl_destruct_level)
670#define PL_perldb               (vTHX->Iperldb)
671#define PL_perlio               (vTHX->Iperlio)
672#define PL_pidstatus            (vTHX->Ipidstatus)
673#define PL_preambleav           (vTHX->Ipreambleav)
674#define PL_preambled            (vTHX->Ipreambled)
675#define PL_preprocess           (vTHX->Ipreprocess)
676#define PL_profiledata          (vTHX->Iprofiledata)
677#define PL_psig_name            (vTHX->Ipsig_name)
678#define PL_psig_pend            (vTHX->Ipsig_pend)
679#define PL_psig_ptr             (vTHX->Ipsig_ptr)
680#define PL_ptr_table            (vTHX->Iptr_table)
681#define PL_reentrant_buffer     (vTHX->Ireentrant_buffer)
682#define PL_regex_pad            (vTHX->Iregex_pad)
683#define PL_regex_padav          (vTHX->Iregex_padav)
684#define PL_replgv               (vTHX->Ireplgv)
685#define PL_rsfp                 (vTHX->Irsfp)
686#define PL_rsfp_filters         (vTHX->Irsfp_filters)
687#define PL_runops               (vTHX->Irunops)
688#define PL_savebegin            (vTHX->Isavebegin)
689#define PL_sawampersand         (vTHX->Isawampersand)
690#define PL_sh_path              (vTHX->Ish_path)
691#define PL_sig_pending          (vTHX->Isig_pending)
692#define PL_sighandlerp          (vTHX->Isighandlerp)
693#define PL_sort_RealCmp         (vTHX->Isort_RealCmp)
694#define PL_splitstr             (vTHX->Isplitstr)
695#define PL_srand_called         (vTHX->Isrand_called)
696#define PL_statusvalue          (vTHX->Istatusvalue)
697#define PL_statusvalue_vms      (vTHX->Istatusvalue_vms)
698#define PL_stderrgv             (vTHX->Istderrgv)
699#define PL_stdingv              (vTHX->Istdingv)
700#define PL_strtab               (vTHX->Istrtab)
701#define PL_strtab_mutex         (vTHX->Istrtab_mutex)
702#define PL_sub_generation       (vTHX->Isub_generation)
703#define PL_sublex_info          (vTHX->Isublex_info)
704#define PL_subline              (vTHX->Isubline)
705#define PL_subname              (vTHX->Isubname)
706#define PL_sv_arenaroot         (vTHX->Isv_arenaroot)
707#define PL_sv_count             (vTHX->Isv_count)
708#define PL_sv_lock_mutex        (vTHX->Isv_lock_mutex)
709#define PL_sv_mutex             (vTHX->Isv_mutex)
710#define PL_sv_no                (vTHX->Isv_no)
711#define PL_sv_objcount          (vTHX->Isv_objcount)
712#define PL_sv_root              (vTHX->Isv_root)
713#define PL_sv_undef             (vTHX->Isv_undef)
714#define PL_sv_yes               (vTHX->Isv_yes)
715#define PL_svref_mutex          (vTHX->Isvref_mutex)
716#define PL_sys_intern           (vTHX->Isys_intern)
717#define PL_taint_warn           (vTHX->Itaint_warn)
718#define PL_tainting             (vTHX->Itainting)
719#define PL_threadnum            (vTHX->Ithreadnum)
720#define PL_threads_mutex        (vTHX->Ithreads_mutex)
721#define PL_threadsv_names       (vTHX->Ithreadsv_names)
722#define PL_thrsv                (vTHX->Ithrsv)
723#define PL_tokenbuf             (vTHX->Itokenbuf)
724#define PL_uid                  (vTHX->Iuid)
725#define PL_unsafe               (vTHX->Iunsafe)
726#define PL_utf8_alnum           (vTHX->Iutf8_alnum)
727#define PL_utf8_alnumc          (vTHX->Iutf8_alnumc)
728#define PL_utf8_alpha           (vTHX->Iutf8_alpha)
729#define PL_utf8_ascii           (vTHX->Iutf8_ascii)
730#define PL_utf8_cntrl           (vTHX->Iutf8_cntrl)
731#define PL_utf8_digit           (vTHX->Iutf8_digit)
732#define PL_utf8_graph           (vTHX->Iutf8_graph)
733#define PL_utf8_idcont          (vTHX->Iutf8_idcont)
734#define PL_utf8_idstart         (vTHX->Iutf8_idstart)
735#define PL_utf8_lower           (vTHX->Iutf8_lower)
736#define PL_utf8_mark            (vTHX->Iutf8_mark)
737#define PL_utf8_print           (vTHX->Iutf8_print)
738#define PL_utf8_punct           (vTHX->Iutf8_punct)
739#define PL_utf8_space           (vTHX->Iutf8_space)
740#define PL_utf8_tofold          (vTHX->Iutf8_tofold)
741#define PL_utf8_tolower         (vTHX->Iutf8_tolower)
742#define PL_utf8_totitle         (vTHX->Iutf8_totitle)
743#define PL_utf8_toupper         (vTHX->Iutf8_toupper)
744#define PL_utf8_upper           (vTHX->Iutf8_upper)
745#define PL_utf8_xdigit          (vTHX->Iutf8_xdigit)
746#define PL_uudmap               (vTHX->Iuudmap)
747#define PL_wantutf8             (vTHX->Iwantutf8)
748#define PL_warnhook             (vTHX->Iwarnhook)
749#define PL_widesyscalls         (vTHX->Iwidesyscalls)
750#define PL_xiv_arenaroot        (vTHX->Ixiv_arenaroot)
751#define PL_xiv_root             (vTHX->Ixiv_root)
752#define PL_xnv_arenaroot        (vTHX->Ixnv_arenaroot)
753#define PL_xnv_root             (vTHX->Ixnv_root)
754#define PL_xpv_arenaroot        (vTHX->Ixpv_arenaroot)
755#define PL_xpv_root             (vTHX->Ixpv_root)
756#define PL_xpvav_arenaroot      (vTHX->Ixpvav_arenaroot)
757#define PL_xpvav_root           (vTHX->Ixpvav_root)
758#define PL_xpvbm_arenaroot      (vTHX->Ixpvbm_arenaroot)
759#define PL_xpvbm_root           (vTHX->Ixpvbm_root)
760#define PL_xpvcv_arenaroot      (vTHX->Ixpvcv_arenaroot)
761#define PL_xpvcv_root           (vTHX->Ixpvcv_root)
762#define PL_xpvhv_arenaroot      (vTHX->Ixpvhv_arenaroot)
763#define PL_xpvhv_root           (vTHX->Ixpvhv_root)
764#define PL_xpviv_arenaroot      (vTHX->Ixpviv_arenaroot)
765#define PL_xpviv_root           (vTHX->Ixpviv_root)
766#define PL_xpvlv_arenaroot      (vTHX->Ixpvlv_arenaroot)
767#define PL_xpvlv_root           (vTHX->Ixpvlv_root)
768#define PL_xpvmg_arenaroot      (vTHX->Ixpvmg_arenaroot)
769#define PL_xpvmg_root           (vTHX->Ixpvmg_root)
770#define PL_xpvnv_arenaroot      (vTHX->Ixpvnv_arenaroot)
771#define PL_xpvnv_root           (vTHX->Ixpvnv_root)
772#define PL_xrv_arenaroot        (vTHX->Ixrv_arenaroot)
773#define PL_xrv_root             (vTHX->Ixrv_root)
774#define PL_yychar               (vTHX->Iyychar)
775#define PL_yydebug              (vTHX->Iyydebug)
776#define PL_yyerrflag            (vTHX->Iyyerrflag)
777#define PL_yylval               (vTHX->Iyylval)
778#define PL_yynerrs              (vTHX->Iyynerrs)
779#define PL_yyval                (vTHX->Iyyval)
780
781#  endif        /* USE_5005THREADS */
782
783#else   /* !MULTIPLICITY */
784
785/* cases 1 and 4 above */
786
787#define PL_IArgv                PL_Argv
788#define PL_ICmd                 PL_Cmd
789#define PL_IDBcv                PL_DBcv
790#define PL_IDBgv                PL_DBgv
791#define PL_IDBline              PL_DBline
792#define PL_IDBsignal            PL_DBsignal
793#define PL_IDBsingle            PL_DBsingle
794#define PL_IDBsub               PL_DBsub
795#define PL_IDBtrace             PL_DBtrace
796#define PL_IDir                 PL_Dir
797#define PL_IEnv                 PL_Env
798#define PL_ILIO                 PL_LIO
799#define PL_IMem                 PL_Mem
800#define PL_IMemParse            PL_MemParse
801#define PL_IMemShared           PL_MemShared
802#define PL_IOpPtr               PL_OpPtr
803#define PL_IOpSlab              PL_OpSlab
804#define PL_IOpSpace             PL_OpSpace
805#define PL_IProc                PL_Proc
806#define PL_ISock                PL_Sock
807#define PL_IStdIO               PL_StdIO
808#define PL_Iamagic_generation   PL_amagic_generation
809#define PL_Ian                  PL_an
810#define PL_Iargvgv              PL_argvgv
811#define PL_Iargvout_stack       PL_argvout_stack
812#define PL_Iargvoutgv           PL_argvoutgv
813#define PL_Ibasetime            PL_basetime
814#define PL_Ibeginav             PL_beginav
815#define PL_Ibeginav_save        PL_beginav_save
816#define PL_Ibitcount            PL_bitcount
817#define PL_Ibufend              PL_bufend
818#define PL_Ibufptr              PL_bufptr
819#define PL_Icheckav             PL_checkav
820#define PL_Icollation_ix        PL_collation_ix
821#define PL_Icollation_name      PL_collation_name
822#define PL_Icollation_standard  PL_collation_standard
823#define PL_Icollxfrm_base       PL_collxfrm_base
824#define PL_Icollxfrm_mult       PL_collxfrm_mult
825#define PL_Icompcv              PL_compcv
826#define PL_Icompiling           PL_compiling
827#define PL_Icomppad             PL_comppad
828#define PL_Icomppad_name        PL_comppad_name
829#define PL_Icomppad_name_fill   PL_comppad_name_fill
830#define PL_Icomppad_name_floor  PL_comppad_name_floor
831#define PL_Icop_seqmax          PL_cop_seqmax
832#define PL_Icopline             PL_copline
833#define PL_Icred_mutex          PL_cred_mutex
834#define PL_Icryptseen           PL_cryptseen
835#define PL_Icshlen              PL_cshlen
836#define PL_Icshname             PL_cshname
837#define PL_Icurcopdb            PL_curcopdb
838#define PL_Icurstname           PL_curstname
839#define PL_Icurthr              PL_curthr
840#define PL_Icustom_op_descs     PL_custom_op_descs
841#define PL_Icustom_op_names     PL_custom_op_names
842#define PL_Idbargs              PL_dbargs
843#define PL_Idebstash            PL_debstash
844#define PL_Idebug               PL_debug
845#define PL_Idebug_pad           PL_debug_pad
846#define PL_Idef_layerlist       PL_def_layerlist
847#define PL_Idefgv               PL_defgv
848#define PL_Idiehook             PL_diehook
849#define PL_Idoextract           PL_doextract
850#define PL_Idoswitches          PL_doswitches
851#define PL_Idowarn              PL_dowarn
852#define PL_Ie_script            PL_e_script
853#define PL_Iegid                PL_egid
854#define PL_Iencoding            PL_encoding
855#define PL_Iendav               PL_endav
856#define PL_Ienvgv               PL_envgv
857#define PL_Ierrgv               PL_errgv
858#define PL_Ierror_count         PL_error_count
859#define PL_Ieuid                PL_euid
860#define PL_Ieval_cond           PL_eval_cond
861#define PL_Ieval_mutex          PL_eval_mutex
862#define PL_Ieval_owner          PL_eval_owner
863#define PL_Ieval_root           PL_eval_root
864#define PL_Ieval_start          PL_eval_start
865#define PL_Ievalseq             PL_evalseq
866#define PL_Iexit_flags          PL_exit_flags
867#define PL_Iexitlist            PL_exitlist
868#define PL_Iexitlistlen         PL_exitlistlen
869#define PL_Iexpect              PL_expect
870#define PL_Ifdpid               PL_fdpid
871#define PL_Ifdpid_mutex         PL_fdpid_mutex
872#define PL_Ifilemode            PL_filemode
873#define PL_Iforkprocess         PL_forkprocess
874#define PL_Iformfeed            PL_formfeed
875#define PL_Igeneration          PL_generation
876#define PL_Igensym              PL_gensym
877#define PL_Igid                 PL_gid
878#define PL_Iglob_index          PL_glob_index
879#define PL_Iglobalstash         PL_globalstash
880#define PL_Ihe_arenaroot        PL_he_arenaroot
881#define PL_Ihe_root             PL_he_root
882#define PL_Ihintgv              PL_hintgv
883#define PL_Ihints               PL_hints
884#define PL_Iin_clean_all        PL_in_clean_all
885#define PL_Iin_clean_objs       PL_in_clean_objs
886#define PL_Iin_my               PL_in_my
887#define PL_Iin_my_stash         PL_in_my_stash
888#define PL_Iincgv               PL_incgv
889#define PL_Iinitav              PL_initav
890#define PL_Iinplace             PL_inplace
891#define PL_Iknown_layers        PL_known_layers
892#define PL_Ilast_lop            PL_last_lop
893#define PL_Ilast_lop_op         PL_last_lop_op
894#define PL_Ilast_swash_hv       PL_last_swash_hv
895#define PL_Ilast_swash_key      PL_last_swash_key
896#define PL_Ilast_swash_klen     PL_last_swash_klen
897#define PL_Ilast_swash_slen     PL_last_swash_slen
898#define PL_Ilast_swash_tmps     PL_last_swash_tmps
899#define PL_Ilast_uni            PL_last_uni
900#define PL_Ilastfd              PL_lastfd
901#define PL_Ilaststatval         PL_laststatval
902#define PL_Ilaststype           PL_laststype
903#define PL_Ilex_brackets        PL_lex_brackets
904#define PL_Ilex_brackstack      PL_lex_brackstack
905#define PL_Ilex_casemods        PL_lex_casemods
906#define PL_Ilex_casestack       PL_lex_casestack
907#define PL_Ilex_defer           PL_lex_defer
908#define PL_Ilex_dojoin          PL_lex_dojoin
909#define PL_Ilex_expect          PL_lex_expect
910#define PL_Ilex_formbrack       PL_lex_formbrack
911#define PL_Ilex_inpat           PL_lex_inpat
912#define PL_Ilex_inwhat          PL_lex_inwhat
913#define PL_Ilex_op              PL_lex_op
914#define PL_Ilex_repl            PL_lex_repl
915#define PL_Ilex_starts          PL_lex_starts
916#define PL_Ilex_state           PL_lex_state
917#define PL_Ilex_stuff           PL_lex_stuff
918#define PL_Ilineary             PL_lineary
919#define PL_Ilinestart           PL_linestart
920#define PL_Ilinestr             PL_linestr
921#define PL_Ilocalpatches        PL_localpatches
922#define PL_Imain_cv             PL_main_cv
923#define PL_Imain_root           PL_main_root
924#define PL_Imain_start          PL_main_start
925#define PL_Imax_intro_pending   PL_max_intro_pending
926#define PL_Imaxo                PL_maxo
927#define PL_Imaxsysfd            PL_maxsysfd
928#define PL_Imess_sv             PL_mess_sv
929#define PL_Imin_intro_pending   PL_min_intro_pending
930#define PL_Iminus_F             PL_minus_F
931#define PL_Iminus_a             PL_minus_a
932#define PL_Iminus_c             PL_minus_c
933#define PL_Iminus_l             PL_minus_l
934#define PL_Iminus_n             PL_minus_n
935#define PL_Iminus_p             PL_minus_p
936#define PL_Imodglobal           PL_modglobal
937#define PL_Imulti_close         PL_multi_close
938#define PL_Imulti_end           PL_multi_end
939#define PL_Imulti_open          PL_multi_open
940#define PL_Imulti_start         PL_multi_start
941#define PL_Imultiline           PL_multiline
942#define PL_Inexttoke            PL_nexttoke
943#define PL_Inexttype            PL_nexttype
944#define PL_Inextval             PL_nextval
945#define PL_Inice_chunk          PL_nice_chunk
946#define PL_Inice_chunk_size     PL_nice_chunk_size
947#define PL_Inomemok             PL_nomemok
948#define PL_Inthreads            PL_nthreads
949#define PL_Inthreads_cond       PL_nthreads_cond
950#define PL_Inullstash           PL_nullstash
951#define PL_Inumeric_compat1     PL_numeric_compat1
952#define PL_Inumeric_local       PL_numeric_local
953#define PL_Inumeric_name        PL_numeric_name
954#define PL_Inumeric_radix_sv    PL_numeric_radix_sv
955#define PL_Inumeric_standard    PL_numeric_standard
956#define PL_Iofmt                PL_ofmt
957#define PL_Ioldbufptr           PL_oldbufptr
958#define PL_Ioldname             PL_oldname
959#define PL_Ioldoldbufptr        PL_oldoldbufptr
960#define PL_Iop_mask             PL_op_mask
961#define PL_Iop_seqmax           PL_op_seqmax
962#define PL_Iorigalen            PL_origalen
963#define PL_Iorigargc            PL_origargc
964#define PL_Iorigargv            PL_origargv
965#define PL_Iorigenviron         PL_origenviron
966#define PL_Iorigfilename        PL_origfilename
967#define PL_Iors_sv              PL_ors_sv
968#define PL_Iosname              PL_osname
969#define PL_Ipad_reset_pending   PL_pad_reset_pending
970#define PL_Ipadix               PL_padix
971#define PL_Ipadix_floor         PL_padix_floor
972#define PL_Ipatchlevel          PL_patchlevel
973#define PL_Ipending_ident       PL_pending_ident
974#define PL_Iperl_destruct_level PL_perl_destruct_level
975#define PL_Iperldb              PL_perldb
976#define PL_Iperlio              PL_perlio
977#define PL_Ipidstatus           PL_pidstatus
978#define PL_Ipreambleav          PL_preambleav
979#define PL_Ipreambled           PL_preambled
980#define PL_Ipreprocess          PL_preprocess
981#define PL_Iprofiledata         PL_profiledata
982#define PL_Ipsig_name           PL_psig_name
983#define PL_Ipsig_pend           PL_psig_pend
984#define PL_Ipsig_ptr            PL_psig_ptr
985#define PL_Iptr_table           PL_ptr_table
986#define PL_Ireentrant_buffer    PL_reentrant_buffer
987#define PL_Iregex_pad           PL_regex_pad
988#define PL_Iregex_padav         PL_regex_padav
989#define PL_Ireplgv              PL_replgv
990#define PL_Irsfp                PL_rsfp
991#define PL_Irsfp_filters        PL_rsfp_filters
992#define PL_Irunops              PL_runops
993#define PL_Isavebegin           PL_savebegin
994#define PL_Isawampersand        PL_sawampersand
995#define PL_Ish_path             PL_sh_path
996#define PL_Isig_pending         PL_sig_pending
997#define PL_Isighandlerp         PL_sighandlerp
998#define PL_Isort_RealCmp        PL_sort_RealCmp
999#define PL_Isplitstr            PL_splitstr
1000#define PL_Isrand_called        PL_srand_called
1001#define PL_Istatusvalue         PL_statusvalue
1002#define PL_Istatusvalue_vms     PL_statusvalue_vms
1003#define PL_Istderrgv            PL_stderrgv
1004#define PL_Istdingv             PL_stdingv
1005#define PL_Istrtab              PL_strtab
1006#define PL_Istrtab_mutex        PL_strtab_mutex
1007#define PL_Isub_generation      PL_sub_generation
1008#define PL_Isublex_info         PL_sublex_info
1009#define PL_Isubline             PL_subline
1010#define PL_Isubname             PL_subname
1011#define PL_Isv_arenaroot        PL_sv_arenaroot
1012#define PL_Isv_count            PL_sv_count
1013#define PL_Isv_lock_mutex       PL_sv_lock_mutex
1014#define PL_Isv_mutex            PL_sv_mutex
1015#define PL_Isv_no               PL_sv_no
1016#define PL_Isv_objcount         PL_sv_objcount
1017#define PL_Isv_root             PL_sv_root
1018#define PL_Isv_undef            PL_sv_undef
1019#define PL_Isv_yes              PL_sv_yes
1020#define PL_Isvref_mutex         PL_svref_mutex
1021#define PL_Isys_intern          PL_sys_intern
1022#define PL_Itaint_warn          PL_taint_warn
1023#define PL_Itainting            PL_tainting
1024#define PL_Ithreadnum           PL_threadnum
1025#define PL_Ithreads_mutex       PL_threads_mutex
1026#define PL_Ithreadsv_names      PL_threadsv_names
1027#define PL_Ithrsv               PL_thrsv
1028#define PL_Itokenbuf            PL_tokenbuf
1029#define PL_Iuid                 PL_uid
1030#define PL_Iunsafe              PL_unsafe
1031#define PL_Iutf8_alnum          PL_utf8_alnum
1032#define PL_Iutf8_alnumc         PL_utf8_alnumc
1033#define PL_Iutf8_alpha          PL_utf8_alpha
1034#define PL_Iutf8_ascii          PL_utf8_ascii
1035#define PL_Iutf8_cntrl          PL_utf8_cntrl
1036#define PL_Iutf8_digit          PL_utf8_digit
1037#define PL_Iutf8_graph          PL_utf8_graph
1038#define PL_Iutf8_idcont         PL_utf8_idcont
1039#define PL_Iutf8_idstart        PL_utf8_idstart
1040#define PL_Iutf8_lower          PL_utf8_lower
1041#define PL_Iutf8_mark           PL_utf8_mark
1042#define PL_Iutf8_print          PL_utf8_print
1043#define PL_Iutf8_punct          PL_utf8_punct
1044#define PL_Iutf8_space          PL_utf8_space
1045#define PL_Iutf8_tofold         PL_utf8_tofold
1046#define PL_Iutf8_tolower        PL_utf8_tolower
1047#define PL_Iutf8_totitle        PL_utf8_totitle
1048#define PL_Iutf8_toupper        PL_utf8_toupper
1049#define PL_Iutf8_upper          PL_utf8_upper
1050#define PL_Iutf8_xdigit         PL_utf8_xdigit
1051#define PL_Iuudmap              PL_uudmap
1052#define PL_Iwantutf8            PL_wantutf8
1053#define PL_Iwarnhook            PL_warnhook
1054#define PL_Iwidesyscalls        PL_widesyscalls
1055#define PL_Ixiv_arenaroot       PL_xiv_arenaroot
1056#define PL_Ixiv_root            PL_xiv_root
1057#define PL_Ixnv_arenaroot       PL_xnv_arenaroot
1058#define PL_Ixnv_root            PL_xnv_root
1059#define PL_Ixpv_arenaroot       PL_xpv_arenaroot
1060#define PL_Ixpv_root            PL_xpv_root
1061#define PL_Ixpvav_arenaroot     PL_xpvav_arenaroot
1062#define PL_Ixpvav_root          PL_xpvav_root
1063#define PL_Ixpvbm_arenaroot     PL_xpvbm_arenaroot
1064#define PL_Ixpvbm_root          PL_xpvbm_root
1065#define PL_Ixpvcv_arenaroot     PL_xpvcv_arenaroot
1066#define PL_Ixpvcv_root          PL_xpvcv_root
1067#define PL_Ixpvhv_arenaroot     PL_xpvhv_arenaroot
1068#define PL_Ixpvhv_root          PL_xpvhv_root
1069#define PL_Ixpviv_arenaroot     PL_xpviv_arenaroot
1070#define PL_Ixpviv_root          PL_xpviv_root
1071#define PL_Ixpvlv_arenaroot     PL_xpvlv_arenaroot
1072#define PL_Ixpvlv_root          PL_xpvlv_root
1073#define PL_Ixpvmg_arenaroot     PL_xpvmg_arenaroot
1074#define PL_Ixpvmg_root          PL_xpvmg_root
1075#define PL_Ixpvnv_arenaroot     PL_xpvnv_arenaroot
1076#define PL_Ixpvnv_root          PL_xpvnv_root
1077#define PL_Ixrv_arenaroot       PL_xrv_arenaroot
1078#define PL_Ixrv_root            PL_xrv_root
1079#define PL_Iyychar              PL_yychar
1080#define PL_Iyydebug             PL_yydebug
1081#define PL_Iyyerrflag           PL_yyerrflag
1082#define PL_Iyylval              PL_yylval
1083#define PL_Iyynerrs             PL_yynerrs
1084#define PL_Iyyval               PL_yyval
1085
1086#  if defined(USE_5005THREADS)
1087/* case 4 above */
1088
1089#define PL_Sv                   (aTHX->TSv)
1090#define PL_Xpv                  (aTHX->TXpv)
1091#define PL_av_fetch_sv          (aTHX->Tav_fetch_sv)
1092#define PL_bodytarget           (aTHX->Tbodytarget)
1093#define PL_bostr                (aTHX->Tbostr)
1094#define PL_chopset              (aTHX->Tchopset)
1095#define PL_colors               (aTHX->Tcolors)
1096#define PL_colorset             (aTHX->Tcolorset)
1097#define PL_curcop               (aTHX->Tcurcop)
1098#define PL_curpad               (aTHX->Tcurpad)
1099#define PL_curpm                (aTHX->Tcurpm)
1100#define PL_curstack             (aTHX->Tcurstack)
1101#define PL_curstackinfo         (aTHX->Tcurstackinfo)
1102#define PL_curstash             (aTHX->Tcurstash)
1103#define PL_defoutgv             (aTHX->Tdefoutgv)
1104#define PL_defstash             (aTHX->Tdefstash)
1105#define PL_delaymagic           (aTHX->Tdelaymagic)
1106#define PL_dirty                (aTHX->Tdirty)
1107#define PL_dumpindent           (aTHX->Tdumpindent)
1108#define PL_efloatbuf            (aTHX->Tefloatbuf)
1109#define PL_efloatsize           (aTHX->Tefloatsize)
1110#define PL_errors               (aTHX->Terrors)
1111#define PL_extralen             (aTHX->Textralen)
1112#define PL_firstgv              (aTHX->Tfirstgv)
1113#define PL_formtarget           (aTHX->Tformtarget)
1114#define PL_hv_fetch_ent_mh      (aTHX->Thv_fetch_ent_mh)
1115#define PL_hv_fetch_sv          (aTHX->Thv_fetch_sv)
1116#define PL_in_eval              (aTHX->Tin_eval)
1117#define PL_last_in_gv           (aTHX->Tlast_in_gv)
1118#define PL_lastgotoprobe        (aTHX->Tlastgotoprobe)
1119#define PL_lastscream           (aTHX->Tlastscream)
1120#define PL_localizing           (aTHX->Tlocalizing)
1121#define PL_mainstack            (aTHX->Tmainstack)
1122#define PL_markstack            (aTHX->Tmarkstack)
1123#define PL_markstack_max        (aTHX->Tmarkstack_max)
1124#define PL_markstack_ptr        (aTHX->Tmarkstack_ptr)
1125#define PL_maxscream            (aTHX->Tmaxscream)
1126#define PL_modcount             (aTHX->Tmodcount)
1127#define PL_na                   (aTHX->Tna)
1128#define PL_nrs                  (aTHX->Tnrs)
1129#define PL_ofs_sv               (aTHX->Tofs_sv)
1130#define PL_op                   (aTHX->Top)
1131#define PL_opsave               (aTHX->Topsave)
1132#define PL_peepp                (aTHX->Tpeepp)
1133#define PL_protect              (aTHX->Tprotect)
1134#define PL_reg_call_cc          (aTHX->Treg_call_cc)
1135#define PL_reg_curpm            (aTHX->Treg_curpm)
1136#define PL_reg_eval_set         (aTHX->Treg_eval_set)
1137#define PL_reg_flags            (aTHX->Treg_flags)
1138#define PL_reg_ganch            (aTHX->Treg_ganch)
1139#define PL_reg_leftiter         (aTHX->Treg_leftiter)
1140#define PL_reg_magic            (aTHX->Treg_magic)
1141#define PL_reg_match_utf8       (aTHX->Treg_match_utf8)
1142#define PL_reg_maxiter          (aTHX->Treg_maxiter)
1143#define PL_reg_oldcurpm         (aTHX->Treg_oldcurpm)
1144#define PL_reg_oldpos           (aTHX->Treg_oldpos)
1145#define PL_reg_oldsaved         (aTHX->Treg_oldsaved)
1146#define PL_reg_oldsavedlen      (aTHX->Treg_oldsavedlen)
1147#define PL_reg_poscache         (aTHX->Treg_poscache)
1148#define PL_reg_poscache_size    (aTHX->Treg_poscache_size)
1149#define PL_reg_re               (aTHX->Treg_re)
1150#define PL_reg_start_tmp        (aTHX->Treg_start_tmp)
1151#define PL_reg_start_tmpl       (aTHX->Treg_start_tmpl)
1152#define PL_reg_starttry         (aTHX->Treg_starttry)
1153#define PL_reg_sv               (aTHX->Treg_sv)
1154#define PL_reg_whilem_seen      (aTHX->Treg_whilem_seen)
1155#define PL_regbol               (aTHX->Tregbol)
1156#define PL_regcc                (aTHX->Tregcc)
1157#define PL_regcode              (aTHX->Tregcode)
1158#define PL_regcomp_parse        (aTHX->Tregcomp_parse)
1159#define PL_regcomp_rx           (aTHX->Tregcomp_rx)
1160#define PL_regcompat1           (aTHX->Tregcompat1)
1161#define PL_regcompp             (aTHX->Tregcompp)
1162#define PL_regdata              (aTHX->Tregdata)
1163#define PL_regdummy             (aTHX->Tregdummy)
1164#define PL_regendp              (aTHX->Tregendp)
1165#define PL_regeol               (aTHX->Tregeol)
1166#define PL_regexecp             (aTHX->Tregexecp)
1167#define PL_regflags             (aTHX->Tregflags)
1168#define PL_regfree              (aTHX->Tregfree)
1169#define PL_regindent            (aTHX->Tregindent)
1170#define PL_reginput             (aTHX->Treginput)
1171#define PL_regint_start         (aTHX->Tregint_start)
1172#define PL_regint_string        (aTHX->Tregint_string)
1173#define PL_reginterp_cnt        (aTHX->Treginterp_cnt)
1174#define PL_reglastcloseparen    (aTHX->Treglastcloseparen)
1175#define PL_reglastparen         (aTHX->Treglastparen)
1176#define PL_regnarrate           (aTHX->Tregnarrate)
1177#define PL_regnaughty           (aTHX->Tregnaughty)
1178#define PL_regnpar              (aTHX->Tregnpar)
1179#define PL_regprecomp           (aTHX->Tregprecomp)
1180#define PL_regprogram           (aTHX->Tregprogram)
1181#define PL_regsawback           (aTHX->Tregsawback)
1182#define PL_regseen              (aTHX->Tregseen)
1183#define PL_regsize              (aTHX->Tregsize)
1184#define PL_regstartp            (aTHX->Tregstartp)
1185#define PL_regtill              (aTHX->Tregtill)
1186#define PL_regxend              (aTHX->Tregxend)
1187#define PL_restartop            (aTHX->Trestartop)
1188#define PL_retstack             (aTHX->Tretstack)
1189#define PL_retstack_ix          (aTHX->Tretstack_ix)
1190#define PL_retstack_max         (aTHX->Tretstack_max)
1191#define PL_rs                   (aTHX->Trs)
1192#define PL_savestack            (aTHX->Tsavestack)
1193#define PL_savestack_ix         (aTHX->Tsavestack_ix)
1194#define PL_savestack_max        (aTHX->Tsavestack_max)
1195#define PL_scopestack           (aTHX->Tscopestack)
1196#define PL_scopestack_ix        (aTHX->Tscopestack_ix)
1197#define PL_scopestack_max       (aTHX->Tscopestack_max)
1198#define PL_screamfirst          (aTHX->Tscreamfirst)
1199#define PL_screamnext           (aTHX->Tscreamnext)
1200#define PL_secondgv             (aTHX->Tsecondgv)
1201#define PL_seen_evals           (aTHX->Tseen_evals)
1202#define PL_seen_zerolen         (aTHX->Tseen_zerolen)
1203#define PL_sortcop              (aTHX->Tsortcop)
1204#define PL_sortcxix             (aTHX->Tsortcxix)
1205#define PL_sortstash            (aTHX->Tsortstash)
1206#define PL_stack_base           (aTHX->Tstack_base)
1207#define PL_stack_max            (aTHX->Tstack_max)
1208#define PL_stack_sp             (aTHX->Tstack_sp)
1209#define PL_start_env            (aTHX->Tstart_env)
1210#define PL_statbuf              (aTHX->Tstatbuf)
1211#define PL_statcache            (aTHX->Tstatcache)
1212#define PL_statgv               (aTHX->Tstatgv)
1213#define PL_statname             (aTHX->Tstatname)
1214#define PL_tainted              (aTHX->Ttainted)
1215#define PL_timesbuf             (aTHX->Ttimesbuf)
1216#define PL_tmps_floor           (aTHX->Ttmps_floor)
1217#define PL_tmps_ix              (aTHX->Ttmps_ix)
1218#define PL_tmps_max             (aTHX->Ttmps_max)
1219#define PL_tmps_stack           (aTHX->Ttmps_stack)
1220#define PL_top_env              (aTHX->Ttop_env)
1221#define PL_toptarget            (aTHX->Ttoptarget)
1222#define PL_watchaddr            (aTHX->Twatchaddr)
1223#define PL_watchok              (aTHX->Twatchok)
1224
1225#  else /* !USE_5005THREADS */
1226/* case 1 above */
1227
1228#define PL_TSv                  PL_Sv
1229#define PL_TXpv                 PL_Xpv
1230#define PL_Tav_fetch_sv         PL_av_fetch_sv
1231#define PL_Tbodytarget          PL_bodytarget
1232#define PL_Tbostr               PL_bostr
1233#define PL_Tchopset             PL_chopset
1234#define PL_Tcolors              PL_colors
1235#define PL_Tcolorset            PL_colorset
1236#define PL_Tcurcop              PL_curcop
1237#define PL_Tcurpad              PL_curpad
1238#define PL_Tcurpm               PL_curpm
1239#define PL_Tcurstack            PL_curstack
1240#define PL_Tcurstackinfo        PL_curstackinfo
1241#define PL_Tcurstash            PL_curstash
1242#define PL_Tdefoutgv            PL_defoutgv
1243#define PL_Tdefstash            PL_defstash
1244#define PL_Tdelaymagic          PL_delaymagic
1245#define PL_Tdirty               PL_dirty
1246#define PL_Tdumpindent          PL_dumpindent
1247#define PL_Tefloatbuf           PL_efloatbuf
1248#define PL_Tefloatsize          PL_efloatsize
1249#define PL_Terrors              PL_errors
1250#define PL_Textralen            PL_extralen
1251#define PL_Tfirstgv             PL_firstgv
1252#define PL_Tformtarget          PL_formtarget
1253#define PL_Thv_fetch_ent_mh     PL_hv_fetch_ent_mh
1254#define PL_Thv_fetch_sv         PL_hv_fetch_sv
1255#define PL_Tin_eval             PL_in_eval
1256#define PL_Tlast_in_gv          PL_last_in_gv
1257#define PL_Tlastgotoprobe       PL_lastgotoprobe
1258#define PL_Tlastscream          PL_lastscream
1259#define PL_Tlocalizing          PL_localizing
1260#define PL_Tmainstack           PL_mainstack
1261#define PL_Tmarkstack           PL_markstack
1262#define PL_Tmarkstack_max       PL_markstack_max
1263#define PL_Tmarkstack_ptr       PL_markstack_ptr
1264#define PL_Tmaxscream           PL_maxscream
1265#define PL_Tmodcount            PL_modcount
1266#define PL_Tna                  PL_na
1267#define PL_Tnrs                 PL_nrs
1268#define PL_Tofs_sv              PL_ofs_sv
1269#define PL_Top                  PL_op
1270#define PL_Topsave              PL_opsave
1271#define PL_Tpeepp               PL_peepp
1272#define PL_Tprotect             PL_protect
1273#define PL_Treg_call_cc         PL_reg_call_cc
1274#define PL_Treg_curpm           PL_reg_curpm
1275#define PL_Treg_eval_set        PL_reg_eval_set
1276#define PL_Treg_flags           PL_reg_flags
1277#define PL_Treg_ganch           PL_reg_ganch
1278#define PL_Treg_leftiter        PL_reg_leftiter
1279#define PL_Treg_magic           PL_reg_magic
1280#define PL_Treg_match_utf8      PL_reg_match_utf8
1281#define PL_Treg_maxiter         PL_reg_maxiter
1282#define PL_Treg_oldcurpm        PL_reg_oldcurpm
1283#define PL_Treg_oldpos          PL_reg_oldpos
1284#define PL_Treg_oldsaved        PL_reg_oldsaved
1285#define PL_Treg_oldsavedlen     PL_reg_oldsavedlen
1286#define PL_Treg_poscache        PL_reg_poscache
1287#define PL_Treg_poscache_size   PL_reg_poscache_size
1288#define PL_Treg_re              PL_reg_re
1289#define PL_Treg_start_tmp       PL_reg_start_tmp
1290#define PL_Treg_start_tmpl      PL_reg_start_tmpl
1291#define PL_Treg_starttry        PL_reg_starttry
1292#define PL_Treg_sv              PL_reg_sv
1293#define PL_Treg_whilem_seen     PL_reg_whilem_seen
1294#define PL_Tregbol              PL_regbol
1295#define PL_Tregcc               PL_regcc
1296#define PL_Tregcode             PL_regcode
1297#define PL_Tregcomp_parse       PL_regcomp_parse
1298#define PL_Tregcomp_rx          PL_regcomp_rx
1299#define PL_Tregcompat1          PL_regcompat1
1300#define PL_Tregcompp            PL_regcompp
1301#define PL_Tregdata             PL_regdata
1302#define PL_Tregdummy            PL_regdummy
1303#define PL_Tregendp             PL_regendp
1304#define PL_Tregeol              PL_regeol
1305#define PL_Tregexecp            PL_regexecp
1306#define PL_Tregflags            PL_regflags
1307#define PL_Tregfree             PL_regfree
1308#define PL_Tregindent           PL_regindent
1309#define PL_Treginput            PL_reginput
1310#define PL_Tregint_start        PL_regint_start
1311#define PL_Tregint_string       PL_regint_string
1312#define PL_Treginterp_cnt       PL_reginterp_cnt
1313#define PL_Treglastcloseparen   PL_reglastcloseparen
1314#define PL_Treglastparen        PL_reglastparen
1315#define PL_Tregnarrate          PL_regnarrate
1316#define PL_Tregnaughty          PL_regnaughty
1317#define PL_Tregnpar             PL_regnpar
1318#define PL_Tregprecomp          PL_regprecomp
1319#define PL_Tregprogram          PL_regprogram
1320#define PL_Tregsawback          PL_regsawback
1321#define PL_Tregseen             PL_regseen
1322#define PL_Tregsize             PL_regsize
1323#define PL_Tregstartp           PL_regstartp
1324#define PL_Tregtill             PL_regtill
1325#define PL_Tregxend             PL_regxend
1326#define PL_Trestartop           PL_restartop
1327#define PL_Tretstack            PL_retstack
1328#define PL_Tretstack_ix         PL_retstack_ix
1329#define PL_Tretstack_max        PL_retstack_max
1330#define PL_Trs                  PL_rs
1331#define PL_Tsavestack           PL_savestack
1332#define PL_Tsavestack_ix        PL_savestack_ix
1333#define PL_Tsavestack_max       PL_savestack_max
1334#define PL_Tscopestack          PL_scopestack
1335#define PL_Tscopestack_ix       PL_scopestack_ix
1336#define PL_Tscopestack_max      PL_scopestack_max
1337#define PL_Tscreamfirst         PL_screamfirst
1338#define PL_Tscreamnext          PL_screamnext
1339#define PL_Tsecondgv            PL_secondgv
1340#define PL_Tseen_evals          PL_seen_evals
1341#define PL_Tseen_zerolen        PL_seen_zerolen
1342#define PL_Tsortcop             PL_sortcop
1343#define PL_Tsortcxix            PL_sortcxix
1344#define PL_Tsortstash           PL_sortstash
1345#define PL_Tstack_base          PL_stack_base
1346#define PL_Tstack_max           PL_stack_max
1347#define PL_Tstack_sp            PL_stack_sp
1348#define PL_Tstart_env           PL_start_env
1349#define PL_Tstatbuf             PL_statbuf
1350#define PL_Tstatcache           PL_statcache
1351#define PL_Tstatgv              PL_statgv
1352#define PL_Tstatname            PL_statname
1353#define PL_Ttainted             PL_tainted
1354#define PL_Ttimesbuf            PL_timesbuf
1355#define PL_Ttmps_floor          PL_tmps_floor
1356#define PL_Ttmps_ix             PL_tmps_ix
1357#define PL_Ttmps_max            PL_tmps_max
1358#define PL_Ttmps_stack          PL_tmps_stack
1359#define PL_Ttop_env             PL_top_env
1360#define PL_Ttoptarget           PL_toptarget
1361#define PL_Twatchaddr           PL_watchaddr
1362#define PL_Twatchok             PL_watchok
1363
1364#  endif        /* USE_5005THREADS */
1365#endif  /* MULTIPLICITY */
1366
1367#if defined(PERL_GLOBAL_STRUCT)
1368
1369#define PL_No                   (PL_Vars.GNo)
1370#define PL_Yes                  (PL_Vars.GYes)
1371#define PL_curinterp            (PL_Vars.Gcurinterp)
1372#define PL_do_undump            (PL_Vars.Gdo_undump)
1373#define PL_hexdigit             (PL_Vars.Ghexdigit)
1374#define PL_lockhook             (PL_Vars.Glockhook)
1375#define PL_malloc_mutex         (PL_Vars.Gmalloc_mutex)
1376#define PL_op_mutex             (PL_Vars.Gop_mutex)
1377#define PL_patleave             (PL_Vars.Gpatleave)
1378#define PL_runops_dbg           (PL_Vars.Grunops_dbg)
1379#define PL_runops_std           (PL_Vars.Grunops_std)
1380#define PL_sharehook            (PL_Vars.Gsharehook)
1381#define PL_thr_key              (PL_Vars.Gthr_key)
1382#define PL_threadhook           (PL_Vars.Gthreadhook)
1383#define PL_unlockhook           (PL_Vars.Gunlockhook)
1384
1385#else /* !PERL_GLOBAL_STRUCT */
1386
1387#define PL_GNo                  PL_No
1388#define PL_GYes                 PL_Yes
1389#define PL_Gcurinterp           PL_curinterp
1390#define PL_Gdo_undump           PL_do_undump
1391#define PL_Ghexdigit            PL_hexdigit
1392#define PL_Glockhook            PL_lockhook
1393#define PL_Gmalloc_mutex        PL_malloc_mutex
1394#define PL_Gop_mutex            PL_op_mutex
1395#define PL_Gpatleave            PL_patleave
1396#define PL_Grunops_dbg          PL_runops_dbg
1397#define PL_Grunops_std          PL_runops_std
1398#define PL_Gsharehook           PL_sharehook
1399#define PL_Gthr_key             PL_thr_key
1400#define PL_Gthreadhook          PL_threadhook
1401#define PL_Gunlockhook          PL_unlockhook
1402
1403#endif /* PERL_GLOBAL_STRUCT */
1404
1405#ifdef PERL_POLLUTE             /* disabled by default in 5.6.0 */
1406
1407#define DBsingle                PL_DBsingle
1408#define DBsub                   PL_DBsub
1409#define compiling               PL_compiling
1410#define curcop                  PL_curcop
1411#define curstash                PL_curstash
1412#define debstash                PL_debstash
1413#define defgv                   PL_defgv
1414#define diehook                 PL_diehook
1415#define dirty                   PL_dirty
1416#define dowarn                  PL_dowarn
1417#define errgv                   PL_errgv
1418#define na                      PL_na
1419#define no_modify               PL_no_modify
1420#define perl_destruct_level     PL_perl_destruct_level
1421#define perldb                  PL_perldb
1422#define ppaddr                  PL_ppaddr
1423#define rsfp                    PL_rsfp
1424#define rsfp_filters            PL_rsfp_filters
1425#define stack_base              PL_stack_base
1426#define stack_sp                PL_stack_sp
1427#define stdingv                 PL_stdingv
1428#define sv_arenaroot            PL_sv_arenaroot
1429#define sv_no                   PL_sv_no
1430#define sv_undef                PL_sv_undef
1431#define sv_yes                  PL_sv_yes
1432#define tainted                 PL_tainted
1433#define tainting                PL_tainting
1434
1435#endif /* PERL_POLLUTE */
Note: See TracBrowser for help on using the repository browser.