Test case for #10433/#10424.
[p5sagit/p5-mst-13.2.git] / perlapi.h
CommitLineData
1c846c1f 1/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
51371543 2 This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h,
3 perlvars.h and thrdvar.h. Any changes made here will be lost!
4*/
5
51371543 6/* declare accessor functions for Perl variables */
6f4183fe 7#ifndef __perlapi_h__
8#define __perlapi_h__
51371543 9
6f4183fe 10#if defined(PERL_OBJECT) || defined (MULTIPLICITY)
c5be433b 11
12#if defined(PERL_OBJECT)
13# undef aTHXo
14# define aTHXo pPerl
15# undef aTHXo_
16# define aTHXo_ aTHXo,
c5be433b 17#endif /* PERL_OBJECT */
18
51371543 19START_EXTERN_C
20
21#undef PERLVAR
22#undef PERLVARA
23#undef PERLVARI
24#undef PERLVARIC
c5be433b 25#define PERLVAR(v,t) EXTERN_C t* Perl_##v##_ptr(pTHXo);
51371543 26#define PERLVARA(v,n,t) typedef t PL_##v##_t[n]; \
c5be433b 27 EXTERN_C PL_##v##_t* Perl_##v##_ptr(pTHXo);
51371543 28#define PERLVARI(v,t,i) PERLVAR(v,t)
c5be433b 29#define PERLVARIC(v,t,i) PERLVAR(v, const t)
51371543 30
31#include "thrdvar.h"
32#include "intrpvar.h"
33#include "perlvars.h"
34
35#undef PERLVAR
36#undef PERLVARA
37#undef PERLVARI
38#undef PERLVARIC
39
40END_EXTERN_C
41
682fc664 42#if defined(PERL_CORE)
6f4183fe 43
682fc664 44/* accessor functions for Perl variables (provide binary compatibility) */
45
46/* these need to be mentioned here, or most linkers won't put them in
47 the perl executable */
48
49#ifndef PERL_NO_FORCE_LINK
50
51START_EXTERN_C
52
53#ifndef DOINIT
54EXT void *PL_force_link_funcs[];
55#else
56EXT void *PL_force_link_funcs[] = {
57#undef PERLVAR
58#undef PERLVARA
59#undef PERLVARI
60#undef PERLVARIC
ea1f607c 61#define PERLVAR(v,t) (void*)Perl_##v##_ptr,
682fc664 62#define PERLVARA(v,n,t) PERLVAR(v,t)
63#define PERLVARI(v,t,i) PERLVAR(v,t)
64#define PERLVARIC(v,t,i) PERLVAR(v,t)
65
66#include "thrdvar.h"
67#include "intrpvar.h"
68#include "perlvars.h"
69
70#undef PERLVAR
71#undef PERLVARA
72#undef PERLVARI
73#undef PERLVARIC
74};
75#endif /* DOINIT */
76
77START_EXTERN_C
78
79#endif /* PERL_NO_FORCE_LINK */
80
81#else /* !PERL_CORE */
6f4183fe 82
83#undef PL_Argv
84#define PL_Argv (*Perl_IArgv_ptr(aTHXo))
85#undef PL_Cmd
86#define PL_Cmd (*Perl_ICmd_ptr(aTHXo))
87#undef PL_DBcv
88#define PL_DBcv (*Perl_IDBcv_ptr(aTHXo))
89#undef PL_DBgv
90#define PL_DBgv (*Perl_IDBgv_ptr(aTHXo))
91#undef PL_DBline
92#define PL_DBline (*Perl_IDBline_ptr(aTHXo))
93#undef PL_DBsignal
94#define PL_DBsignal (*Perl_IDBsignal_ptr(aTHXo))
95#undef PL_DBsingle
96#define PL_DBsingle (*Perl_IDBsingle_ptr(aTHXo))
97#undef PL_DBsub
98#define PL_DBsub (*Perl_IDBsub_ptr(aTHXo))
99#undef PL_DBtrace
100#define PL_DBtrace (*Perl_IDBtrace_ptr(aTHXo))
101#undef PL_Dir
102#define PL_Dir (*Perl_IDir_ptr(aTHXo))
103#undef PL_Env
104#define PL_Env (*Perl_IEnv_ptr(aTHXo))
105#undef PL_LIO
106#define PL_LIO (*Perl_ILIO_ptr(aTHXo))
107#undef PL_Mem
108#define PL_Mem (*Perl_IMem_ptr(aTHXo))
109#undef PL_MemParse
110#define PL_MemParse (*Perl_IMemParse_ptr(aTHXo))
111#undef PL_MemShared
112#define PL_MemShared (*Perl_IMemShared_ptr(aTHXo))
113#undef PL_Proc
114#define PL_Proc (*Perl_IProc_ptr(aTHXo))
115#undef PL_Sock
116#define PL_Sock (*Perl_ISock_ptr(aTHXo))
117#undef PL_StdIO
118#define PL_StdIO (*Perl_IStdIO_ptr(aTHXo))
119#undef PL_amagic_generation
120#define PL_amagic_generation (*Perl_Iamagic_generation_ptr(aTHXo))
121#undef PL_an
122#define PL_an (*Perl_Ian_ptr(aTHXo))
123#undef PL_argvgv
124#define PL_argvgv (*Perl_Iargvgv_ptr(aTHXo))
125#undef PL_argvout_stack
126#define PL_argvout_stack (*Perl_Iargvout_stack_ptr(aTHXo))
127#undef PL_argvoutgv
128#define PL_argvoutgv (*Perl_Iargvoutgv_ptr(aTHXo))
129#undef PL_basetime
130#define PL_basetime (*Perl_Ibasetime_ptr(aTHXo))
131#undef PL_beginav
132#define PL_beginav (*Perl_Ibeginav_ptr(aTHXo))
059a8bb7 133#undef PL_beginav_save
134#define PL_beginav_save (*Perl_Ibeginav_save_ptr(aTHXo))
6f4183fe 135#undef PL_bitcount
136#define PL_bitcount (*Perl_Ibitcount_ptr(aTHXo))
137#undef PL_bufend
138#define PL_bufend (*Perl_Ibufend_ptr(aTHXo))
139#undef PL_bufptr
140#define PL_bufptr (*Perl_Ibufptr_ptr(aTHXo))
7d30b5c4 141#undef PL_checkav
142#define PL_checkav (*Perl_Icheckav_ptr(aTHXo))
6f4183fe 143#undef PL_collation_ix
144#define PL_collation_ix (*Perl_Icollation_ix_ptr(aTHXo))
145#undef PL_collation_name
146#define PL_collation_name (*Perl_Icollation_name_ptr(aTHXo))
147#undef PL_collation_standard
148#define PL_collation_standard (*Perl_Icollation_standard_ptr(aTHXo))
149#undef PL_collxfrm_base
150#define PL_collxfrm_base (*Perl_Icollxfrm_base_ptr(aTHXo))
151#undef PL_collxfrm_mult
152#define PL_collxfrm_mult (*Perl_Icollxfrm_mult_ptr(aTHXo))
153#undef PL_compcv
154#define PL_compcv (*Perl_Icompcv_ptr(aTHXo))
155#undef PL_compiling
156#define PL_compiling (*Perl_Icompiling_ptr(aTHXo))
157#undef PL_comppad
158#define PL_comppad (*Perl_Icomppad_ptr(aTHXo))
159#undef PL_comppad_name
160#define PL_comppad_name (*Perl_Icomppad_name_ptr(aTHXo))
161#undef PL_comppad_name_fill
162#define PL_comppad_name_fill (*Perl_Icomppad_name_fill_ptr(aTHXo))
163#undef PL_comppad_name_floor
164#define PL_comppad_name_floor (*Perl_Icomppad_name_floor_ptr(aTHXo))
165#undef PL_cop_seqmax
166#define PL_cop_seqmax (*Perl_Icop_seqmax_ptr(aTHXo))
167#undef PL_copline
168#define PL_copline (*Perl_Icopline_ptr(aTHXo))
169#undef PL_cred_mutex
170#define PL_cred_mutex (*Perl_Icred_mutex_ptr(aTHXo))
171#undef PL_cryptseen
172#define PL_cryptseen (*Perl_Icryptseen_ptr(aTHXo))
173#undef PL_cshlen
174#define PL_cshlen (*Perl_Icshlen_ptr(aTHXo))
175#undef PL_cshname
176#define PL_cshname (*Perl_Icshname_ptr(aTHXo))
177#undef PL_curcopdb
178#define PL_curcopdb (*Perl_Icurcopdb_ptr(aTHXo))
179#undef PL_curstname
180#define PL_curstname (*Perl_Icurstname_ptr(aTHXo))
181#undef PL_curthr
182#define PL_curthr (*Perl_Icurthr_ptr(aTHXo))
183#undef PL_dbargs
184#define PL_dbargs (*Perl_Idbargs_ptr(aTHXo))
185#undef PL_debstash
186#define PL_debstash (*Perl_Idebstash_ptr(aTHXo))
187#undef PL_debug
188#define PL_debug (*Perl_Idebug_ptr(aTHXo))
189#undef PL_defgv
190#define PL_defgv (*Perl_Idefgv_ptr(aTHXo))
191#undef PL_diehook
192#define PL_diehook (*Perl_Idiehook_ptr(aTHXo))
193#undef PL_doextract
194#define PL_doextract (*Perl_Idoextract_ptr(aTHXo))
195#undef PL_doswitches
196#define PL_doswitches (*Perl_Idoswitches_ptr(aTHXo))
197#undef PL_dowarn
198#define PL_dowarn (*Perl_Idowarn_ptr(aTHXo))
199#undef PL_e_script
200#define PL_e_script (*Perl_Ie_script_ptr(aTHXo))
201#undef PL_egid
202#define PL_egid (*Perl_Iegid_ptr(aTHXo))
203#undef PL_endav
204#define PL_endav (*Perl_Iendav_ptr(aTHXo))
205#undef PL_envgv
206#define PL_envgv (*Perl_Ienvgv_ptr(aTHXo))
207#undef PL_errgv
208#define PL_errgv (*Perl_Ierrgv_ptr(aTHXo))
209#undef PL_error_count
210#define PL_error_count (*Perl_Ierror_count_ptr(aTHXo))
211#undef PL_euid
212#define PL_euid (*Perl_Ieuid_ptr(aTHXo))
213#undef PL_eval_cond
214#define PL_eval_cond (*Perl_Ieval_cond_ptr(aTHXo))
215#undef PL_eval_mutex
216#define PL_eval_mutex (*Perl_Ieval_mutex_ptr(aTHXo))
217#undef PL_eval_owner
218#define PL_eval_owner (*Perl_Ieval_owner_ptr(aTHXo))
219#undef PL_eval_root
220#define PL_eval_root (*Perl_Ieval_root_ptr(aTHXo))
221#undef PL_eval_start
222#define PL_eval_start (*Perl_Ieval_start_ptr(aTHXo))
223#undef PL_evalseq
224#define PL_evalseq (*Perl_Ievalseq_ptr(aTHXo))
225#undef PL_exit_flags
226#define PL_exit_flags (*Perl_Iexit_flags_ptr(aTHXo))
227#undef PL_exitlist
228#define PL_exitlist (*Perl_Iexitlist_ptr(aTHXo))
229#undef PL_exitlistlen
230#define PL_exitlistlen (*Perl_Iexitlistlen_ptr(aTHXo))
231#undef PL_expect
232#define PL_expect (*Perl_Iexpect_ptr(aTHXo))
233#undef PL_fdpid
234#define PL_fdpid (*Perl_Ifdpid_ptr(aTHXo))
48b1b78b 235#undef PL_fdpid_mutex
236#define PL_fdpid_mutex (*Perl_Ifdpid_mutex_ptr(aTHXo))
6f4183fe 237#undef PL_filemode
238#define PL_filemode (*Perl_Ifilemode_ptr(aTHXo))
239#undef PL_forkprocess
240#define PL_forkprocess (*Perl_Iforkprocess_ptr(aTHXo))
241#undef PL_formfeed
242#define PL_formfeed (*Perl_Iformfeed_ptr(aTHXo))
243#undef PL_generation
244#define PL_generation (*Perl_Igeneration_ptr(aTHXo))
245#undef PL_gensym
246#define PL_gensym (*Perl_Igensym_ptr(aTHXo))
247#undef PL_gid
248#define PL_gid (*Perl_Igid_ptr(aTHXo))
249#undef PL_glob_index
250#define PL_glob_index (*Perl_Iglob_index_ptr(aTHXo))
251#undef PL_globalstash
252#define PL_globalstash (*Perl_Iglobalstash_ptr(aTHXo))
612f20c3 253#undef PL_he_arenaroot
254#define PL_he_arenaroot (*Perl_Ihe_arenaroot_ptr(aTHXo))
6f4183fe 255#undef PL_he_root
256#define PL_he_root (*Perl_Ihe_root_ptr(aTHXo))
257#undef PL_hintgv
258#define PL_hintgv (*Perl_Ihintgv_ptr(aTHXo))
259#undef PL_hints
260#define PL_hints (*Perl_Ihints_ptr(aTHXo))
261#undef PL_in_clean_all
262#define PL_in_clean_all (*Perl_Iin_clean_all_ptr(aTHXo))
263#undef PL_in_clean_objs
264#define PL_in_clean_objs (*Perl_Iin_clean_objs_ptr(aTHXo))
265#undef PL_in_my
266#define PL_in_my (*Perl_Iin_my_ptr(aTHXo))
267#undef PL_in_my_stash
268#define PL_in_my_stash (*Perl_Iin_my_stash_ptr(aTHXo))
269#undef PL_incgv
270#define PL_incgv (*Perl_Iincgv_ptr(aTHXo))
271#undef PL_initav
272#define PL_initav (*Perl_Iinitav_ptr(aTHXo))
273#undef PL_inplace
274#define PL_inplace (*Perl_Iinplace_ptr(aTHXo))
275#undef PL_last_lop
276#define PL_last_lop (*Perl_Ilast_lop_ptr(aTHXo))
277#undef PL_last_lop_op
278#define PL_last_lop_op (*Perl_Ilast_lop_op_ptr(aTHXo))
279#undef PL_last_swash_hv
280#define PL_last_swash_hv (*Perl_Ilast_swash_hv_ptr(aTHXo))
281#undef PL_last_swash_key
282#define PL_last_swash_key (*Perl_Ilast_swash_key_ptr(aTHXo))
283#undef PL_last_swash_klen
284#define PL_last_swash_klen (*Perl_Ilast_swash_klen_ptr(aTHXo))
285#undef PL_last_swash_slen
286#define PL_last_swash_slen (*Perl_Ilast_swash_slen_ptr(aTHXo))
287#undef PL_last_swash_tmps
288#define PL_last_swash_tmps (*Perl_Ilast_swash_tmps_ptr(aTHXo))
289#undef PL_last_uni
290#define PL_last_uni (*Perl_Ilast_uni_ptr(aTHXo))
291#undef PL_lastfd
292#define PL_lastfd (*Perl_Ilastfd_ptr(aTHXo))
293#undef PL_laststatval
294#define PL_laststatval (*Perl_Ilaststatval_ptr(aTHXo))
295#undef PL_laststype
296#define PL_laststype (*Perl_Ilaststype_ptr(aTHXo))
297#undef PL_lex_brackets
298#define PL_lex_brackets (*Perl_Ilex_brackets_ptr(aTHXo))
299#undef PL_lex_brackstack
300#define PL_lex_brackstack (*Perl_Ilex_brackstack_ptr(aTHXo))
301#undef PL_lex_casemods
302#define PL_lex_casemods (*Perl_Ilex_casemods_ptr(aTHXo))
303#undef PL_lex_casestack
304#define PL_lex_casestack (*Perl_Ilex_casestack_ptr(aTHXo))
305#undef PL_lex_defer
306#define PL_lex_defer (*Perl_Ilex_defer_ptr(aTHXo))
307#undef PL_lex_dojoin
308#define PL_lex_dojoin (*Perl_Ilex_dojoin_ptr(aTHXo))
309#undef PL_lex_expect
310#define PL_lex_expect (*Perl_Ilex_expect_ptr(aTHXo))
311#undef PL_lex_formbrack
312#define PL_lex_formbrack (*Perl_Ilex_formbrack_ptr(aTHXo))
313#undef PL_lex_inpat
314#define PL_lex_inpat (*Perl_Ilex_inpat_ptr(aTHXo))
315#undef PL_lex_inwhat
316#define PL_lex_inwhat (*Perl_Ilex_inwhat_ptr(aTHXo))
317#undef PL_lex_op
318#define PL_lex_op (*Perl_Ilex_op_ptr(aTHXo))
319#undef PL_lex_repl
320#define PL_lex_repl (*Perl_Ilex_repl_ptr(aTHXo))
321#undef PL_lex_starts
322#define PL_lex_starts (*Perl_Ilex_starts_ptr(aTHXo))
323#undef PL_lex_state
324#define PL_lex_state (*Perl_Ilex_state_ptr(aTHXo))
325#undef PL_lex_stuff
326#define PL_lex_stuff (*Perl_Ilex_stuff_ptr(aTHXo))
327#undef PL_lineary
328#define PL_lineary (*Perl_Ilineary_ptr(aTHXo))
329#undef PL_linestart
330#define PL_linestart (*Perl_Ilinestart_ptr(aTHXo))
331#undef PL_linestr
332#define PL_linestr (*Perl_Ilinestr_ptr(aTHXo))
333#undef PL_localpatches
334#define PL_localpatches (*Perl_Ilocalpatches_ptr(aTHXo))
335#undef PL_main_cv
336#define PL_main_cv (*Perl_Imain_cv_ptr(aTHXo))
337#undef PL_main_root
338#define PL_main_root (*Perl_Imain_root_ptr(aTHXo))
339#undef PL_main_start
340#define PL_main_start (*Perl_Imain_start_ptr(aTHXo))
341#undef PL_max_intro_pending
342#define PL_max_intro_pending (*Perl_Imax_intro_pending_ptr(aTHXo))
343#undef PL_maxo
344#define PL_maxo (*Perl_Imaxo_ptr(aTHXo))
345#undef PL_maxsysfd
346#define PL_maxsysfd (*Perl_Imaxsysfd_ptr(aTHXo))
347#undef PL_mess_sv
348#define PL_mess_sv (*Perl_Imess_sv_ptr(aTHXo))
349#undef PL_min_intro_pending
350#define PL_min_intro_pending (*Perl_Imin_intro_pending_ptr(aTHXo))
351#undef PL_minus_F
352#define PL_minus_F (*Perl_Iminus_F_ptr(aTHXo))
353#undef PL_minus_a
354#define PL_minus_a (*Perl_Iminus_a_ptr(aTHXo))
355#undef PL_minus_c
356#define PL_minus_c (*Perl_Iminus_c_ptr(aTHXo))
357#undef PL_minus_l
358#define PL_minus_l (*Perl_Iminus_l_ptr(aTHXo))
359#undef PL_minus_n
360#define PL_minus_n (*Perl_Iminus_n_ptr(aTHXo))
361#undef PL_minus_p
362#define PL_minus_p (*Perl_Iminus_p_ptr(aTHXo))
363#undef PL_modglobal
364#define PL_modglobal (*Perl_Imodglobal_ptr(aTHXo))
365#undef PL_multi_close
366#define PL_multi_close (*Perl_Imulti_close_ptr(aTHXo))
367#undef PL_multi_end
368#define PL_multi_end (*Perl_Imulti_end_ptr(aTHXo))
369#undef PL_multi_open
370#define PL_multi_open (*Perl_Imulti_open_ptr(aTHXo))
371#undef PL_multi_start
372#define PL_multi_start (*Perl_Imulti_start_ptr(aTHXo))
373#undef PL_multiline
374#define PL_multiline (*Perl_Imultiline_ptr(aTHXo))
375#undef PL_nexttoke
376#define PL_nexttoke (*Perl_Inexttoke_ptr(aTHXo))
377#undef PL_nexttype
378#define PL_nexttype (*Perl_Inexttype_ptr(aTHXo))
379#undef PL_nextval
380#define PL_nextval (*Perl_Inextval_ptr(aTHXo))
381#undef PL_nice_chunk
382#define PL_nice_chunk (*Perl_Inice_chunk_ptr(aTHXo))
383#undef PL_nice_chunk_size
384#define PL_nice_chunk_size (*Perl_Inice_chunk_size_ptr(aTHXo))
385#undef PL_nomemok
386#define PL_nomemok (*Perl_Inomemok_ptr(aTHXo))
387#undef PL_nthreads
388#define PL_nthreads (*Perl_Inthreads_ptr(aTHXo))
389#undef PL_nthreads_cond
390#define PL_nthreads_cond (*Perl_Inthreads_cond_ptr(aTHXo))
f180df80 391#undef PL_nullstash
392#define PL_nullstash (*Perl_Inullstash_ptr(aTHXo))
a453c169 393#undef PL_numeric_compat1
394#define PL_numeric_compat1 (*Perl_Inumeric_compat1_ptr(aTHXo))
6f4183fe 395#undef PL_numeric_local
396#define PL_numeric_local (*Perl_Inumeric_local_ptr(aTHXo))
397#undef PL_numeric_name
398#define PL_numeric_name (*Perl_Inumeric_name_ptr(aTHXo))
a453c169 399#undef PL_numeric_radix_sv
400#define PL_numeric_radix_sv (*Perl_Inumeric_radix_sv_ptr(aTHXo))
6f4183fe 401#undef PL_numeric_standard
402#define PL_numeric_standard (*Perl_Inumeric_standard_ptr(aTHXo))
403#undef PL_ofmt
404#define PL_ofmt (*Perl_Iofmt_ptr(aTHXo))
405#undef PL_oldbufptr
406#define PL_oldbufptr (*Perl_Ioldbufptr_ptr(aTHXo))
407#undef PL_oldname
408#define PL_oldname (*Perl_Ioldname_ptr(aTHXo))
409#undef PL_oldoldbufptr
410#define PL_oldoldbufptr (*Perl_Ioldoldbufptr_ptr(aTHXo))
411#undef PL_op_mask
412#define PL_op_mask (*Perl_Iop_mask_ptr(aTHXo))
413#undef PL_op_seqmax
414#define PL_op_seqmax (*Perl_Iop_seqmax_ptr(aTHXo))
415#undef PL_origalen
416#define PL_origalen (*Perl_Iorigalen_ptr(aTHXo))
417#undef PL_origargc
418#define PL_origargc (*Perl_Iorigargc_ptr(aTHXo))
419#undef PL_origargv
420#define PL_origargv (*Perl_Iorigargv_ptr(aTHXo))
421#undef PL_origenviron
422#define PL_origenviron (*Perl_Iorigenviron_ptr(aTHXo))
423#undef PL_origfilename
424#define PL_origfilename (*Perl_Iorigfilename_ptr(aTHXo))
7889fe52 425#undef PL_ors_sv
426#define PL_ors_sv (*Perl_Iors_sv_ptr(aTHXo))
6f4183fe 427#undef PL_osname
428#define PL_osname (*Perl_Iosname_ptr(aTHXo))
429#undef PL_pad_reset_pending
430#define PL_pad_reset_pending (*Perl_Ipad_reset_pending_ptr(aTHXo))
431#undef PL_padix
432#define PL_padix (*Perl_Ipadix_ptr(aTHXo))
433#undef PL_padix_floor
434#define PL_padix_floor (*Perl_Ipadix_floor_ptr(aTHXo))
435#undef PL_patchlevel
436#define PL_patchlevel (*Perl_Ipatchlevel_ptr(aTHXo))
437#undef PL_pending_ident
438#define PL_pending_ident (*Perl_Ipending_ident_ptr(aTHXo))
439#undef PL_perl_destruct_level
440#define PL_perl_destruct_level (*Perl_Iperl_destruct_level_ptr(aTHXo))
441#undef PL_perldb
442#define PL_perldb (*Perl_Iperldb_ptr(aTHXo))
443#undef PL_pidstatus
444#define PL_pidstatus (*Perl_Ipidstatus_ptr(aTHXo))
445#undef PL_preambleav
446#define PL_preambleav (*Perl_Ipreambleav_ptr(aTHXo))
447#undef PL_preambled
448#define PL_preambled (*Perl_Ipreambled_ptr(aTHXo))
449#undef PL_preprocess
450#define PL_preprocess (*Perl_Ipreprocess_ptr(aTHXo))
451#undef PL_profiledata
452#define PL_profiledata (*Perl_Iprofiledata_ptr(aTHXo))
453#undef PL_psig_name
454#define PL_psig_name (*Perl_Ipsig_name_ptr(aTHXo))
ce08f86c 455#undef PL_psig_pend
456#define PL_psig_pend (*Perl_Ipsig_pend_ptr(aTHXo))
6f4183fe 457#undef PL_psig_ptr
458#define PL_psig_ptr (*Perl_Ipsig_ptr_ptr(aTHXo))
459#undef PL_ptr_table
460#define PL_ptr_table (*Perl_Iptr_table_ptr(aTHXo))
461#undef PL_replgv
462#define PL_replgv (*Perl_Ireplgv_ptr(aTHXo))
463#undef PL_rsfp
464#define PL_rsfp (*Perl_Irsfp_ptr(aTHXo))
465#undef PL_rsfp_filters
466#define PL_rsfp_filters (*Perl_Irsfp_filters_ptr(aTHXo))
467#undef PL_runops
468#define PL_runops (*Perl_Irunops_ptr(aTHXo))
469#undef PL_sawampersand
470#define PL_sawampersand (*Perl_Isawampersand_ptr(aTHXo))
471#undef PL_sh_path
472#define PL_sh_path (*Perl_Ish_path_ptr(aTHXo))
ce08f86c 473#undef PL_sig_pending
474#define PL_sig_pending (*Perl_Isig_pending_ptr(aTHXo))
6f4183fe 475#undef PL_sighandlerp
476#define PL_sighandlerp (*Perl_Isighandlerp_ptr(aTHXo))
477#undef PL_splitstr
478#define PL_splitstr (*Perl_Isplitstr_ptr(aTHXo))
479#undef PL_srand_called
480#define PL_srand_called (*Perl_Isrand_called_ptr(aTHXo))
481#undef PL_statusvalue
482#define PL_statusvalue (*Perl_Istatusvalue_ptr(aTHXo))
483#undef PL_statusvalue_vms
484#define PL_statusvalue_vms (*Perl_Istatusvalue_vms_ptr(aTHXo))
485#undef PL_stderrgv
486#define PL_stderrgv (*Perl_Istderrgv_ptr(aTHXo))
487#undef PL_stdingv
488#define PL_stdingv (*Perl_Istdingv_ptr(aTHXo))
6f4183fe 489#undef PL_strtab
490#define PL_strtab (*Perl_Istrtab_ptr(aTHXo))
491#undef PL_strtab_mutex
492#define PL_strtab_mutex (*Perl_Istrtab_mutex_ptr(aTHXo))
493#undef PL_sub_generation
494#define PL_sub_generation (*Perl_Isub_generation_ptr(aTHXo))
495#undef PL_sublex_info
496#define PL_sublex_info (*Perl_Isublex_info_ptr(aTHXo))
497#undef PL_subline
498#define PL_subline (*Perl_Isubline_ptr(aTHXo))
499#undef PL_subname
500#define PL_subname (*Perl_Isubname_ptr(aTHXo))
501#undef PL_sv_arenaroot
502#define PL_sv_arenaroot (*Perl_Isv_arenaroot_ptr(aTHXo))
503#undef PL_sv_count
504#define PL_sv_count (*Perl_Isv_count_ptr(aTHXo))
48b1b78b 505#undef PL_sv_lock_mutex
506#define PL_sv_lock_mutex (*Perl_Isv_lock_mutex_ptr(aTHXo))
6f4183fe 507#undef PL_sv_mutex
508#define PL_sv_mutex (*Perl_Isv_mutex_ptr(aTHXo))
509#undef PL_sv_no
510#define PL_sv_no (*Perl_Isv_no_ptr(aTHXo))
511#undef PL_sv_objcount
512#define PL_sv_objcount (*Perl_Isv_objcount_ptr(aTHXo))
513#undef PL_sv_root
514#define PL_sv_root (*Perl_Isv_root_ptr(aTHXo))
515#undef PL_sv_undef
516#define PL_sv_undef (*Perl_Isv_undef_ptr(aTHXo))
517#undef PL_sv_yes
518#define PL_sv_yes (*Perl_Isv_yes_ptr(aTHXo))
519#undef PL_svref_mutex
520#define PL_svref_mutex (*Perl_Isvref_mutex_ptr(aTHXo))
521#undef PL_sys_intern
522#define PL_sys_intern (*Perl_Isys_intern_ptr(aTHXo))
523#undef PL_tainting
524#define PL_tainting (*Perl_Itainting_ptr(aTHXo))
6f4183fe 525#undef PL_threadnum
526#define PL_threadnum (*Perl_Ithreadnum_ptr(aTHXo))
527#undef PL_threads_mutex
528#define PL_threads_mutex (*Perl_Ithreads_mutex_ptr(aTHXo))
529#undef PL_threadsv_names
530#define PL_threadsv_names (*Perl_Ithreadsv_names_ptr(aTHXo))
531#undef PL_thrsv
532#define PL_thrsv (*Perl_Ithrsv_ptr(aTHXo))
533#undef PL_tokenbuf
534#define PL_tokenbuf (*Perl_Itokenbuf_ptr(aTHXo))
535#undef PL_uid
536#define PL_uid (*Perl_Iuid_ptr(aTHXo))
537#undef PL_unsafe
538#define PL_unsafe (*Perl_Iunsafe_ptr(aTHXo))
539#undef PL_utf8_alnum
540#define PL_utf8_alnum (*Perl_Iutf8_alnum_ptr(aTHXo))
541#undef PL_utf8_alnumc
542#define PL_utf8_alnumc (*Perl_Iutf8_alnumc_ptr(aTHXo))
543#undef PL_utf8_alpha
544#define PL_utf8_alpha (*Perl_Iutf8_alpha_ptr(aTHXo))
545#undef PL_utf8_ascii
546#define PL_utf8_ascii (*Perl_Iutf8_ascii_ptr(aTHXo))
547#undef PL_utf8_cntrl
548#define PL_utf8_cntrl (*Perl_Iutf8_cntrl_ptr(aTHXo))
549#undef PL_utf8_digit
550#define PL_utf8_digit (*Perl_Iutf8_digit_ptr(aTHXo))
551#undef PL_utf8_graph
552#define PL_utf8_graph (*Perl_Iutf8_graph_ptr(aTHXo))
553#undef PL_utf8_lower
554#define PL_utf8_lower (*Perl_Iutf8_lower_ptr(aTHXo))
555#undef PL_utf8_mark
556#define PL_utf8_mark (*Perl_Iutf8_mark_ptr(aTHXo))
557#undef PL_utf8_print
558#define PL_utf8_print (*Perl_Iutf8_print_ptr(aTHXo))
559#undef PL_utf8_punct
560#define PL_utf8_punct (*Perl_Iutf8_punct_ptr(aTHXo))
561#undef PL_utf8_space
562#define PL_utf8_space (*Perl_Iutf8_space_ptr(aTHXo))
563#undef PL_utf8_tolower
564#define PL_utf8_tolower (*Perl_Iutf8_tolower_ptr(aTHXo))
565#undef PL_utf8_totitle
566#define PL_utf8_totitle (*Perl_Iutf8_totitle_ptr(aTHXo))
567#undef PL_utf8_toupper
568#define PL_utf8_toupper (*Perl_Iutf8_toupper_ptr(aTHXo))
569#undef PL_utf8_upper
570#define PL_utf8_upper (*Perl_Iutf8_upper_ptr(aTHXo))
571#undef PL_utf8_xdigit
572#define PL_utf8_xdigit (*Perl_Iutf8_xdigit_ptr(aTHXo))
573#undef PL_uudmap
574#define PL_uudmap (*Perl_Iuudmap_ptr(aTHXo))
575#undef PL_warnhook
576#define PL_warnhook (*Perl_Iwarnhook_ptr(aTHXo))
46487f74 577#undef PL_widesyscalls
578#define PL_widesyscalls (*Perl_Iwidesyscalls_ptr(aTHXo))
6f4183fe 579#undef PL_xiv_arenaroot
580#define PL_xiv_arenaroot (*Perl_Ixiv_arenaroot_ptr(aTHXo))
581#undef PL_xiv_root
582#define PL_xiv_root (*Perl_Ixiv_root_ptr(aTHXo))
612f20c3 583#undef PL_xnv_arenaroot
584#define PL_xnv_arenaroot (*Perl_Ixnv_arenaroot_ptr(aTHXo))
6f4183fe 585#undef PL_xnv_root
586#define PL_xnv_root (*Perl_Ixnv_root_ptr(aTHXo))
612f20c3 587#undef PL_xpv_arenaroot
588#define PL_xpv_arenaroot (*Perl_Ixpv_arenaroot_ptr(aTHXo))
6f4183fe 589#undef PL_xpv_root
590#define PL_xpv_root (*Perl_Ixpv_root_ptr(aTHXo))
612f20c3 591#undef PL_xpvav_arenaroot
592#define PL_xpvav_arenaroot (*Perl_Ixpvav_arenaroot_ptr(aTHXo))
6f4183fe 593#undef PL_xpvav_root
594#define PL_xpvav_root (*Perl_Ixpvav_root_ptr(aTHXo))
612f20c3 595#undef PL_xpvbm_arenaroot
596#define PL_xpvbm_arenaroot (*Perl_Ixpvbm_arenaroot_ptr(aTHXo))
6f4183fe 597#undef PL_xpvbm_root
598#define PL_xpvbm_root (*Perl_Ixpvbm_root_ptr(aTHXo))
612f20c3 599#undef PL_xpvcv_arenaroot
600#define PL_xpvcv_arenaroot (*Perl_Ixpvcv_arenaroot_ptr(aTHXo))
6f4183fe 601#undef PL_xpvcv_root
602#define PL_xpvcv_root (*Perl_Ixpvcv_root_ptr(aTHXo))
612f20c3 603#undef PL_xpvhv_arenaroot
604#define PL_xpvhv_arenaroot (*Perl_Ixpvhv_arenaroot_ptr(aTHXo))
6f4183fe 605#undef PL_xpvhv_root
606#define PL_xpvhv_root (*Perl_Ixpvhv_root_ptr(aTHXo))
612f20c3 607#undef PL_xpviv_arenaroot
608#define PL_xpviv_arenaroot (*Perl_Ixpviv_arenaroot_ptr(aTHXo))
6f4183fe 609#undef PL_xpviv_root
610#define PL_xpviv_root (*Perl_Ixpviv_root_ptr(aTHXo))
612f20c3 611#undef PL_xpvlv_arenaroot
612#define PL_xpvlv_arenaroot (*Perl_Ixpvlv_arenaroot_ptr(aTHXo))
6f4183fe 613#undef PL_xpvlv_root
614#define PL_xpvlv_root (*Perl_Ixpvlv_root_ptr(aTHXo))
612f20c3 615#undef PL_xpvmg_arenaroot
616#define PL_xpvmg_arenaroot (*Perl_Ixpvmg_arenaroot_ptr(aTHXo))
6f4183fe 617#undef PL_xpvmg_root
618#define PL_xpvmg_root (*Perl_Ixpvmg_root_ptr(aTHXo))
612f20c3 619#undef PL_xpvnv_arenaroot
620#define PL_xpvnv_arenaroot (*Perl_Ixpvnv_arenaroot_ptr(aTHXo))
6f4183fe 621#undef PL_xpvnv_root
622#define PL_xpvnv_root (*Perl_Ixpvnv_root_ptr(aTHXo))
612f20c3 623#undef PL_xrv_arenaroot
624#define PL_xrv_arenaroot (*Perl_Ixrv_arenaroot_ptr(aTHXo))
6f4183fe 625#undef PL_xrv_root
626#define PL_xrv_root (*Perl_Ixrv_root_ptr(aTHXo))
627#undef PL_yychar
628#define PL_yychar (*Perl_Iyychar_ptr(aTHXo))
629#undef PL_yydebug
630#define PL_yydebug (*Perl_Iyydebug_ptr(aTHXo))
631#undef PL_yyerrflag
632#define PL_yyerrflag (*Perl_Iyyerrflag_ptr(aTHXo))
633#undef PL_yylval
634#define PL_yylval (*Perl_Iyylval_ptr(aTHXo))
635#undef PL_yynerrs
636#define PL_yynerrs (*Perl_Iyynerrs_ptr(aTHXo))
637#undef PL_yyval
638#define PL_yyval (*Perl_Iyyval_ptr(aTHXo))
639#undef PL_Sv
640#define PL_Sv (*Perl_TSv_ptr(aTHXo))
641#undef PL_Xpv
642#define PL_Xpv (*Perl_TXpv_ptr(aTHXo))
643#undef PL_av_fetch_sv
644#define PL_av_fetch_sv (*Perl_Tav_fetch_sv_ptr(aTHXo))
645#undef PL_bodytarget
646#define PL_bodytarget (*Perl_Tbodytarget_ptr(aTHXo))
647#undef PL_bostr
648#define PL_bostr (*Perl_Tbostr_ptr(aTHXo))
649#undef PL_chopset
650#define PL_chopset (*Perl_Tchopset_ptr(aTHXo))
651#undef PL_colors
652#define PL_colors (*Perl_Tcolors_ptr(aTHXo))
653#undef PL_colorset
654#define PL_colorset (*Perl_Tcolorset_ptr(aTHXo))
655#undef PL_curcop
656#define PL_curcop (*Perl_Tcurcop_ptr(aTHXo))
657#undef PL_curpad
658#define PL_curpad (*Perl_Tcurpad_ptr(aTHXo))
659#undef PL_curpm
660#define PL_curpm (*Perl_Tcurpm_ptr(aTHXo))
661#undef PL_curstack
662#define PL_curstack (*Perl_Tcurstack_ptr(aTHXo))
663#undef PL_curstackinfo
664#define PL_curstackinfo (*Perl_Tcurstackinfo_ptr(aTHXo))
665#undef PL_curstash
666#define PL_curstash (*Perl_Tcurstash_ptr(aTHXo))
667#undef PL_defoutgv
668#define PL_defoutgv (*Perl_Tdefoutgv_ptr(aTHXo))
669#undef PL_defstash
670#define PL_defstash (*Perl_Tdefstash_ptr(aTHXo))
671#undef PL_delaymagic
672#define PL_delaymagic (*Perl_Tdelaymagic_ptr(aTHXo))
673#undef PL_dirty
674#define PL_dirty (*Perl_Tdirty_ptr(aTHXo))
675#undef PL_dumpindent
676#define PL_dumpindent (*Perl_Tdumpindent_ptr(aTHXo))
677#undef PL_efloatbuf
678#define PL_efloatbuf (*Perl_Tefloatbuf_ptr(aTHXo))
679#undef PL_efloatsize
680#define PL_efloatsize (*Perl_Tefloatsize_ptr(aTHXo))
681#undef PL_errors
682#define PL_errors (*Perl_Terrors_ptr(aTHXo))
683#undef PL_extralen
684#define PL_extralen (*Perl_Textralen_ptr(aTHXo))
685#undef PL_firstgv
686#define PL_firstgv (*Perl_Tfirstgv_ptr(aTHXo))
687#undef PL_formtarget
688#define PL_formtarget (*Perl_Tformtarget_ptr(aTHXo))
689#undef PL_hv_fetch_ent_mh
690#define PL_hv_fetch_ent_mh (*Perl_Thv_fetch_ent_mh_ptr(aTHXo))
691#undef PL_hv_fetch_sv
692#define PL_hv_fetch_sv (*Perl_Thv_fetch_sv_ptr(aTHXo))
693#undef PL_in_eval
694#define PL_in_eval (*Perl_Tin_eval_ptr(aTHXo))
695#undef PL_last_in_gv
696#define PL_last_in_gv (*Perl_Tlast_in_gv_ptr(aTHXo))
697#undef PL_lastgotoprobe
698#define PL_lastgotoprobe (*Perl_Tlastgotoprobe_ptr(aTHXo))
699#undef PL_lastscream
700#define PL_lastscream (*Perl_Tlastscream_ptr(aTHXo))
701#undef PL_localizing
702#define PL_localizing (*Perl_Tlocalizing_ptr(aTHXo))
703#undef PL_mainstack
704#define PL_mainstack (*Perl_Tmainstack_ptr(aTHXo))
705#undef PL_markstack
706#define PL_markstack (*Perl_Tmarkstack_ptr(aTHXo))
707#undef PL_markstack_max
708#define PL_markstack_max (*Perl_Tmarkstack_max_ptr(aTHXo))
709#undef PL_markstack_ptr
710#define PL_markstack_ptr (*Perl_Tmarkstack_ptr_ptr(aTHXo))
711#undef PL_maxscream
712#define PL_maxscream (*Perl_Tmaxscream_ptr(aTHXo))
713#undef PL_modcount
714#define PL_modcount (*Perl_Tmodcount_ptr(aTHXo))
715#undef PL_na
716#define PL_na (*Perl_Tna_ptr(aTHXo))
717#undef PL_nrs
718#define PL_nrs (*Perl_Tnrs_ptr(aTHXo))
7889fe52 719#undef PL_ofs_sv
720#define PL_ofs_sv (*Perl_Tofs_sv_ptr(aTHXo))
6f4183fe 721#undef PL_op
722#define PL_op (*Perl_Top_ptr(aTHXo))
723#undef PL_opsave
724#define PL_opsave (*Perl_Topsave_ptr(aTHXo))
725#undef PL_protect
726#define PL_protect (*Perl_Tprotect_ptr(aTHXo))
727#undef PL_reg_call_cc
728#define PL_reg_call_cc (*Perl_Treg_call_cc_ptr(aTHXo))
729#undef PL_reg_curpm
730#define PL_reg_curpm (*Perl_Treg_curpm_ptr(aTHXo))
731#undef PL_reg_eval_set
732#define PL_reg_eval_set (*Perl_Treg_eval_set_ptr(aTHXo))
733#undef PL_reg_flags
734#define PL_reg_flags (*Perl_Treg_flags_ptr(aTHXo))
735#undef PL_reg_ganch
736#define PL_reg_ganch (*Perl_Treg_ganch_ptr(aTHXo))
737#undef PL_reg_leftiter
738#define PL_reg_leftiter (*Perl_Treg_leftiter_ptr(aTHXo))
739#undef PL_reg_magic
740#define PL_reg_magic (*Perl_Treg_magic_ptr(aTHXo))
741#undef PL_reg_maxiter
742#define PL_reg_maxiter (*Perl_Treg_maxiter_ptr(aTHXo))
743#undef PL_reg_oldcurpm
744#define PL_reg_oldcurpm (*Perl_Treg_oldcurpm_ptr(aTHXo))
745#undef PL_reg_oldpos
746#define PL_reg_oldpos (*Perl_Treg_oldpos_ptr(aTHXo))
747#undef PL_reg_oldsaved
748#define PL_reg_oldsaved (*Perl_Treg_oldsaved_ptr(aTHXo))
749#undef PL_reg_oldsavedlen
750#define PL_reg_oldsavedlen (*Perl_Treg_oldsavedlen_ptr(aTHXo))
751#undef PL_reg_poscache
752#define PL_reg_poscache (*Perl_Treg_poscache_ptr(aTHXo))
753#undef PL_reg_poscache_size
754#define PL_reg_poscache_size (*Perl_Treg_poscache_size_ptr(aTHXo))
755#undef PL_reg_re
756#define PL_reg_re (*Perl_Treg_re_ptr(aTHXo))
757#undef PL_reg_start_tmp
758#define PL_reg_start_tmp (*Perl_Treg_start_tmp_ptr(aTHXo))
759#undef PL_reg_start_tmpl
760#define PL_reg_start_tmpl (*Perl_Treg_start_tmpl_ptr(aTHXo))
761#undef PL_reg_starttry
762#define PL_reg_starttry (*Perl_Treg_starttry_ptr(aTHXo))
763#undef PL_reg_sv
764#define PL_reg_sv (*Perl_Treg_sv_ptr(aTHXo))
765#undef PL_reg_whilem_seen
766#define PL_reg_whilem_seen (*Perl_Treg_whilem_seen_ptr(aTHXo))
767#undef PL_regbol
768#define PL_regbol (*Perl_Tregbol_ptr(aTHXo))
769#undef PL_regcc
770#define PL_regcc (*Perl_Tregcc_ptr(aTHXo))
771#undef PL_regcode
772#define PL_regcode (*Perl_Tregcode_ptr(aTHXo))
773#undef PL_regcomp_parse
774#define PL_regcomp_parse (*Perl_Tregcomp_parse_ptr(aTHXo))
775#undef PL_regcomp_rx
776#define PL_regcomp_rx (*Perl_Tregcomp_rx_ptr(aTHXo))
31376155 777#undef PL_regcompat1
778#define PL_regcompat1 (*Perl_Tregcompat1_ptr(aTHXo))
6f4183fe 779#undef PL_regcompp
780#define PL_regcompp (*Perl_Tregcompp_ptr(aTHXo))
781#undef PL_regdata
782#define PL_regdata (*Perl_Tregdata_ptr(aTHXo))
783#undef PL_regdummy
784#define PL_regdummy (*Perl_Tregdummy_ptr(aTHXo))
785#undef PL_regendp
786#define PL_regendp (*Perl_Tregendp_ptr(aTHXo))
787#undef PL_regeol
788#define PL_regeol (*Perl_Tregeol_ptr(aTHXo))
789#undef PL_regexecp
790#define PL_regexecp (*Perl_Tregexecp_ptr(aTHXo))
791#undef PL_regflags
792#define PL_regflags (*Perl_Tregflags_ptr(aTHXo))
793#undef PL_regfree
794#define PL_regfree (*Perl_Tregfree_ptr(aTHXo))
795#undef PL_regindent
796#define PL_regindent (*Perl_Tregindent_ptr(aTHXo))
797#undef PL_reginput
798#define PL_reginput (*Perl_Treginput_ptr(aTHXo))
799#undef PL_regint_start
800#define PL_regint_start (*Perl_Tregint_start_ptr(aTHXo))
801#undef PL_regint_string
802#define PL_regint_string (*Perl_Tregint_string_ptr(aTHXo))
803#undef PL_reginterp_cnt
804#define PL_reginterp_cnt (*Perl_Treginterp_cnt_ptr(aTHXo))
805#undef PL_reglastparen
806#define PL_reglastparen (*Perl_Treglastparen_ptr(aTHXo))
807#undef PL_regnarrate
808#define PL_regnarrate (*Perl_Tregnarrate_ptr(aTHXo))
809#undef PL_regnaughty
810#define PL_regnaughty (*Perl_Tregnaughty_ptr(aTHXo))
811#undef PL_regnpar
812#define PL_regnpar (*Perl_Tregnpar_ptr(aTHXo))
813#undef PL_regprecomp
814#define PL_regprecomp (*Perl_Tregprecomp_ptr(aTHXo))
6f4183fe 815#undef PL_regprogram
816#define PL_regprogram (*Perl_Tregprogram_ptr(aTHXo))
817#undef PL_regsawback
818#define PL_regsawback (*Perl_Tregsawback_ptr(aTHXo))
819#undef PL_regseen
820#define PL_regseen (*Perl_Tregseen_ptr(aTHXo))
821#undef PL_regsize
822#define PL_regsize (*Perl_Tregsize_ptr(aTHXo))
823#undef PL_regstartp
824#define PL_regstartp (*Perl_Tregstartp_ptr(aTHXo))
825#undef PL_regtill
826#define PL_regtill (*Perl_Tregtill_ptr(aTHXo))
827#undef PL_regxend
828#define PL_regxend (*Perl_Tregxend_ptr(aTHXo))
829#undef PL_restartop
830#define PL_restartop (*Perl_Trestartop_ptr(aTHXo))
831#undef PL_retstack
832#define PL_retstack (*Perl_Tretstack_ptr(aTHXo))
833#undef PL_retstack_ix
834#define PL_retstack_ix (*Perl_Tretstack_ix_ptr(aTHXo))
835#undef PL_retstack_max
836#define PL_retstack_max (*Perl_Tretstack_max_ptr(aTHXo))
837#undef PL_rs
838#define PL_rs (*Perl_Trs_ptr(aTHXo))
839#undef PL_savestack
840#define PL_savestack (*Perl_Tsavestack_ptr(aTHXo))
841#undef PL_savestack_ix
842#define PL_savestack_ix (*Perl_Tsavestack_ix_ptr(aTHXo))
843#undef PL_savestack_max
844#define PL_savestack_max (*Perl_Tsavestack_max_ptr(aTHXo))
845#undef PL_scopestack
846#define PL_scopestack (*Perl_Tscopestack_ptr(aTHXo))
847#undef PL_scopestack_ix
848#define PL_scopestack_ix (*Perl_Tscopestack_ix_ptr(aTHXo))
849#undef PL_scopestack_max
850#define PL_scopestack_max (*Perl_Tscopestack_max_ptr(aTHXo))
851#undef PL_screamfirst
852#define PL_screamfirst (*Perl_Tscreamfirst_ptr(aTHXo))
853#undef PL_screamnext
854#define PL_screamnext (*Perl_Tscreamnext_ptr(aTHXo))
855#undef PL_secondgv
856#define PL_secondgv (*Perl_Tsecondgv_ptr(aTHXo))
857#undef PL_seen_evals
858#define PL_seen_evals (*Perl_Tseen_evals_ptr(aTHXo))
859#undef PL_seen_zerolen
860#define PL_seen_zerolen (*Perl_Tseen_zerolen_ptr(aTHXo))
861#undef PL_sortcop
862#define PL_sortcop (*Perl_Tsortcop_ptr(aTHXo))
863#undef PL_sortcxix
864#define PL_sortcxix (*Perl_Tsortcxix_ptr(aTHXo))
865#undef PL_sortstash
866#define PL_sortstash (*Perl_Tsortstash_ptr(aTHXo))
867#undef PL_stack_base
868#define PL_stack_base (*Perl_Tstack_base_ptr(aTHXo))
869#undef PL_stack_max
870#define PL_stack_max (*Perl_Tstack_max_ptr(aTHXo))
871#undef PL_stack_sp
872#define PL_stack_sp (*Perl_Tstack_sp_ptr(aTHXo))
873#undef PL_start_env
874#define PL_start_env (*Perl_Tstart_env_ptr(aTHXo))
875#undef PL_statbuf
876#define PL_statbuf (*Perl_Tstatbuf_ptr(aTHXo))
877#undef PL_statcache
878#define PL_statcache (*Perl_Tstatcache_ptr(aTHXo))
879#undef PL_statgv
880#define PL_statgv (*Perl_Tstatgv_ptr(aTHXo))
881#undef PL_statname
882#define PL_statname (*Perl_Tstatname_ptr(aTHXo))
883#undef PL_tainted
884#define PL_tainted (*Perl_Ttainted_ptr(aTHXo))
885#undef PL_timesbuf
886#define PL_timesbuf (*Perl_Ttimesbuf_ptr(aTHXo))
887#undef PL_tmps_floor
888#define PL_tmps_floor (*Perl_Ttmps_floor_ptr(aTHXo))
889#undef PL_tmps_ix
890#define PL_tmps_ix (*Perl_Ttmps_ix_ptr(aTHXo))
891#undef PL_tmps_max
892#define PL_tmps_max (*Perl_Ttmps_max_ptr(aTHXo))
893#undef PL_tmps_stack
894#define PL_tmps_stack (*Perl_Ttmps_stack_ptr(aTHXo))
895#undef PL_top_env
896#define PL_top_env (*Perl_Ttop_env_ptr(aTHXo))
897#undef PL_toptarget
898#define PL_toptarget (*Perl_Ttoptarget_ptr(aTHXo))
899#undef PL_watchaddr
900#define PL_watchaddr (*Perl_Twatchaddr_ptr(aTHXo))
901#undef PL_watchok
902#define PL_watchok (*Perl_Twatchok_ptr(aTHXo))
903#undef PL_No
904#define PL_No (*Perl_GNo_ptr(NULL))
905#undef PL_Yes
906#define PL_Yes (*Perl_GYes_ptr(NULL))
907#undef PL_curinterp
908#define PL_curinterp (*Perl_Gcurinterp_ptr(NULL))
909#undef PL_do_undump
910#define PL_do_undump (*Perl_Gdo_undump_ptr(NULL))
911#undef PL_hexdigit
912#define PL_hexdigit (*Perl_Ghexdigit_ptr(NULL))
913#undef PL_malloc_mutex
914#define PL_malloc_mutex (*Perl_Gmalloc_mutex_ptr(NULL))
534825c4 915#undef PL_op_mutex
916#define PL_op_mutex (*Perl_Gop_mutex_ptr(NULL))
6f4183fe 917#undef PL_patleave
918#define PL_patleave (*Perl_Gpatleave_ptr(NULL))
ba869deb 919#undef PL_thr_key
920#define PL_thr_key (*Perl_Gthr_key_ptr(NULL))
6f4183fe 921
922#endif /* !PERL_CORE */
923#endif /* PERL_OBJECT || MULTIPLICITY */
924
925#endif /* __perlapi_h__ */
51371543 926