source: trunk/third/perl/perlapi.h @ 14545

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