Commit | Line | Data |
---|---|---|
78102347 | 1 | /* -*- buffer-read-only: t -*- |
37442d52 | 2 | * |
eb1102fc NIS |
3 | * embedvar.h |
4 | * | |
78102347 NC |
5 | * Copyright (C) 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, |
6 | * 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009 by Larry Wall and others | |
eb1102fc NIS |
7 | * |
8 | * You may distribute under the terms of either the GNU General Public | |
9 | * License or the Artistic License, as specified in the README file. | |
10 | * | |
eb1102fc | 11 | * !!!!!!! DO NOT EDIT THIS FILE !!!!!!! |
d7cb65f2 | 12 | * This file is built by regen/embed.pl from data in embed.fnc, |
78102347 | 13 | * regen/embed.pl, regen/opcodes, intrpvar.h and perlvars.h. |
574c798a SR |
14 | * Any changes made here will be lost! |
15 | * | |
16 | * Edit those files and run 'make regen_headers' to effect changes. | |
eb1102fc | 17 | */ |
d4cce5f1 NIS |
18 | |
19 | /* (Doing namespace management portably in C is really gross.) */ | |
20 | ||
54aff467 | 21 | /* |
3db8f154 MB |
22 | The following combinations of MULTIPLICITY and PERL_IMPLICIT_CONTEXT |
23 | are supported: | |
54aff467 GS |
24 | 1) none |
25 | 2) MULTIPLICITY # supported for compatibility | |
26 | 3) MULTIPLICITY && PERL_IMPLICIT_CONTEXT | |
d4cce5f1 | 27 | |
54aff467 | 28 | All other combinations of these flags are errors. |
d4cce5f1 | 29 | |
3db8f154 | 30 | only #3 is supported directly, while #2 is a special |
54aff467 GS |
31 | case of #3 (supported by redefining vTHX appropriately). |
32 | */ | |
cea2e8a9 | 33 | |
54aff467 | 34 | #if defined(MULTIPLICITY) |
3db8f154 | 35 | /* cases 2 and 3 above */ |
cea2e8a9 | 36 | |
54aff467 GS |
37 | # if defined(PERL_IMPLICIT_CONTEXT) |
38 | # define vTHX aTHX | |
39 | # else | |
40 | # define vTHX PERL_GET_INTERP | |
41 | # endif | |
cea2e8a9 | 42 | |
a8def808 KW |
43 | #define PL_AboveLatin1 (vTHX->IAboveLatin1) |
44 | #define PL_Assigned_invlist (vTHX->IAssigned_invlist) | |
45 | #define PL_CCC_non0_non230 (vTHX->ICCC_non0_non230) | |
a6d69523 | 46 | #define PL_DBcontrol (vTHX->IDBcontrol) |
54aff467 GS |
47 | #define PL_DBcv (vTHX->IDBcv) |
48 | #define PL_DBgv (vTHX->IDBgv) | |
49 | #define PL_DBline (vTHX->IDBline) | |
50 | #define PL_DBsignal (vTHX->IDBsignal) | |
51 | #define PL_DBsingle (vTHX->IDBsingle) | |
52 | #define PL_DBsub (vTHX->IDBsub) | |
53 | #define PL_DBtrace (vTHX->IDBtrace) | |
54 | #define PL_Dir (vTHX->IDir) | |
55 | #define PL_Env (vTHX->IEnv) | |
a8def808 KW |
56 | #define PL_GCB_invlist (vTHX->IGCB_invlist) |
57 | #define PL_HasMultiCharFold (vTHX->IHasMultiCharFold) | |
58 | #define PL_InBitmap (vTHX->IInBitmap) | |
59 | #define PL_InMultiCharFold (vTHX->IInMultiCharFold) | |
60 | #define PL_LB_invlist (vTHX->ILB_invlist) | |
54aff467 | 61 | #define PL_LIO (vTHX->ILIO) |
a8def808 | 62 | #define PL_Latin1 (vTHX->ILatin1) |
54aff467 | 63 | #define PL_Mem (vTHX->IMem) |
1d7c1841 GS |
64 | #define PL_MemParse (vTHX->IMemParse) |
65 | #define PL_MemShared (vTHX->IMemShared) | |
a8def808 KW |
66 | #define PL_Posix_ptrs (vTHX->IPosix_ptrs) |
67 | #define PL_Private_Use (vTHX->IPrivate_Use) | |
54aff467 | 68 | #define PL_Proc (vTHX->IProc) |
a8def808 KW |
69 | #define PL_SB_invlist (vTHX->ISB_invlist) |
70 | #define PL_SCX_invlist (vTHX->ISCX_invlist) | |
54aff467 GS |
71 | #define PL_Sock (vTHX->ISock) |
72 | #define PL_StdIO (vTHX->IStdIO) | |
907b3e23 | 73 | #define PL_Sv (vTHX->ISv) |
8c90d3a9 | 74 | #define PL_TR_SPECIAL_HANDLING_UTF8 (vTHX->ITR_SPECIAL_HANDLING_UTF8) |
a8def808 KW |
75 | #define PL_UpperLatin1 (vTHX->IUpperLatin1) |
76 | #define PL_WB_invlist (vTHX->IWB_invlist) | |
77 | #define PL_XPosix_ptrs (vTHX->IXPosix_ptrs) | |
907b3e23 | 78 | #define PL_Xpv (vTHX->IXpv) |
54aff467 | 79 | #define PL_an (vTHX->Ian) |
54aff467 | 80 | #define PL_argvgv (vTHX->Iargvgv) |
1d7c1841 | 81 | #define PL_argvout_stack (vTHX->Iargvout_stack) |
54aff467 GS |
82 | #define PL_argvoutgv (vTHX->Iargvoutgv) |
83 | #define PL_basetime (vTHX->Ibasetime) | |
84 | #define PL_beginav (vTHX->Ibeginav) | |
059a8bb7 | 85 | #define PL_beginav_save (vTHX->Ibeginav_save) |
1930840b | 86 | #define PL_blockhooks (vTHX->Iblockhooks) |
fdda85ca | 87 | #define PL_body_arenas (vTHX->Ibody_arenas) |
93e68bfb | 88 | #define PL_body_roots (vTHX->Ibody_roots) |
907b3e23 | 89 | #define PL_bodytarget (vTHX->Ibodytarget) |
fd06b02c | 90 | #define PL_breakable_sub_gen (vTHX->Ibreakable_sub_gen) |
7d30b5c4 | 91 | #define PL_checkav (vTHX->Icheckav) |
ece599bd | 92 | #define PL_checkav_save (vTHX->Icheckav_save) |
907b3e23 | 93 | #define PL_chopset (vTHX->Ichopset) |
5311654c | 94 | #define PL_clocktick (vTHX->Iclocktick) |
54aff467 GS |
95 | #define PL_collation_ix (vTHX->Icollation_ix) |
96 | #define PL_collation_name (vTHX->Icollation_name) | |
97 | #define PL_collation_standard (vTHX->Icollation_standard) | |
98 | #define PL_collxfrm_base (vTHX->Icollxfrm_base) | |
99 | #define PL_collxfrm_mult (vTHX->Icollxfrm_mult) | |
907b3e23 DM |
100 | #define PL_colors (vTHX->Icolors) |
101 | #define PL_colorset (vTHX->Icolorset) | |
54aff467 GS |
102 | #define PL_compcv (vTHX->Icompcv) |
103 | #define PL_compiling (vTHX->Icompiling) | |
104 | #define PL_comppad (vTHX->Icomppad) | |
105 | #define PL_comppad_name (vTHX->Icomppad_name) | |
106 | #define PL_comppad_name_fill (vTHX->Icomppad_name_fill) | |
107 | #define PL_comppad_name_floor (vTHX->Icomppad_name_floor) | |
b54c5e14 | 108 | #define PL_constpadix (vTHX->Iconstpadix) |
54aff467 | 109 | #define PL_cop_seqmax (vTHX->Icop_seqmax) |
54aff467 | 110 | #define PL_cryptseen (vTHX->Icryptseen) |
907b3e23 | 111 | #define PL_curcop (vTHX->Icurcop) |
54aff467 | 112 | #define PL_curcopdb (vTHX->Icurcopdb) |
e9bc6d6b | 113 | #define PL_curlocales (vTHX->Icurlocales) |
907b3e23 DM |
114 | #define PL_curpad (vTHX->Icurpad) |
115 | #define PL_curpm (vTHX->Icurpm) | |
5585e758 | 116 | #define PL_curpm_under (vTHX->Icurpm_under) |
907b3e23 DM |
117 | #define PL_curstack (vTHX->Icurstack) |
118 | #define PL_curstackinfo (vTHX->Icurstackinfo) | |
119 | #define PL_curstash (vTHX->Icurstash) | |
54aff467 | 120 | #define PL_curstname (vTHX->Icurstname) |
438c221d AB |
121 | #define PL_custom_op_descs (vTHX->Icustom_op_descs) |
122 | #define PL_custom_op_names (vTHX->Icustom_op_names) | |
1830b3d9 | 123 | #define PL_custom_ops (vTHX->Icustom_ops) |
b5c19bd7 | 124 | #define PL_cv_has_eval (vTHX->Icv_has_eval) |
54aff467 | 125 | #define PL_dbargs (vTHX->Idbargs) |
54aff467 GS |
126 | #define PL_debstash (vTHX->Idebstash) |
127 | #define PL_debug (vTHX->Idebug) | |
ce333219 | 128 | #define PL_debug_pad (vTHX->Idebug_pad) |
3a1ee7e8 | 129 | #define PL_def_layerlist (vTHX->Idef_layerlist) |
54aff467 | 130 | #define PL_defgv (vTHX->Idefgv) |
907b3e23 DM |
131 | #define PL_defoutgv (vTHX->Idefoutgv) |
132 | #define PL_defstash (vTHX->Idefstash) | |
907b3e23 | 133 | #define PL_delaymagic (vTHX->Idelaymagic) |
985213f2 AB |
134 | #define PL_delaymagic_egid (vTHX->Idelaymagic_egid) |
135 | #define PL_delaymagic_euid (vTHX->Idelaymagic_euid) | |
136 | #define PL_delaymagic_gid (vTHX->Idelaymagic_gid) | |
137 | #define PL_delaymagic_uid (vTHX->Idelaymagic_uid) | |
eba16661 | 138 | #define PL_destroyhook (vTHX->Idestroyhook) |
54aff467 | 139 | #define PL_diehook (vTHX->Idiehook) |
54aff467 GS |
140 | #define PL_doswitches (vTHX->Idoswitches) |
141 | #define PL_dowarn (vTHX->Idowarn) | |
2bfbbbaf | 142 | #define PL_dump_re_max_len (vTHX->Idump_re_max_len) |
41e4abd8 | 143 | #define PL_dumper_fd (vTHX->Idumper_fd) |
907b3e23 | 144 | #define PL_dumpindent (vTHX->Idumpindent) |
54aff467 | 145 | #define PL_e_script (vTHX->Ie_script) |
907b3e23 DM |
146 | #define PL_efloatbuf (vTHX->Iefloatbuf) |
147 | #define PL_efloatsize (vTHX->Iefloatsize) | |
54aff467 GS |
148 | #define PL_endav (vTHX->Iendav) |
149 | #define PL_envgv (vTHX->Ienvgv) | |
150 | #define PL_errgv (vTHX->Ierrgv) | |
907b3e23 | 151 | #define PL_errors (vTHX->Ierrors) |
54aff467 GS |
152 | #define PL_eval_root (vTHX->Ieval_root) |
153 | #define PL_eval_start (vTHX->Ieval_start) | |
154 | #define PL_evalseq (vTHX->Ievalseq) | |
1d7c1841 | 155 | #define PL_exit_flags (vTHX->Iexit_flags) |
54aff467 GS |
156 | #define PL_exitlist (vTHX->Iexitlist) |
157 | #define PL_exitlistlen (vTHX->Iexitlistlen) | |
54aff467 GS |
158 | #define PL_fdpid (vTHX->Ifdpid) |
159 | #define PL_filemode (vTHX->Ifilemode) | |
907b3e23 | 160 | #define PL_firstgv (vTHX->Ifirstgv) |
54aff467 | 161 | #define PL_forkprocess (vTHX->Iforkprocess) |
907b3e23 | 162 | #define PL_formtarget (vTHX->Iformtarget) |
54aff467 GS |
163 | #define PL_generation (vTHX->Igeneration) |
164 | #define PL_gensym (vTHX->Igensym) | |
54aff467 | 165 | #define PL_globalstash (vTHX->Iglobalstash) |
d67594ff | 166 | #define PL_globhook (vTHX->Iglobhook) |
0e0ab621 | 167 | #define PL_hash_rand_bits (vTHX->Ihash_rand_bits) |
6a5b4183 | 168 | #define PL_hash_rand_bits_enabled (vTHX->Ihash_rand_bits_enabled) |
54aff467 | 169 | #define PL_hintgv (vTHX->Ihintgv) |
907b3e23 | 170 | #define PL_hv_fetch_ent_mh (vTHX->Ihv_fetch_ent_mh) |
54aff467 GS |
171 | #define PL_in_clean_all (vTHX->Iin_clean_all) |
172 | #define PL_in_clean_objs (vTHX->Iin_clean_objs) | |
907b3e23 | 173 | #define PL_in_eval (vTHX->Iin_eval) |
d7a09b41 | 174 | #define PL_in_load_module (vTHX->Iin_load_module) |
a8def808 | 175 | #define PL_in_some_fold (vTHX->Iin_some_fold) |
165a1c52 | 176 | #define PL_in_utf8_COLLATE_locale (vTHX->Iin_utf8_COLLATE_locale) |
31f05a37 | 177 | #define PL_in_utf8_CTYPE_locale (vTHX->Iin_utf8_CTYPE_locale) |
b8df1494 | 178 | #define PL_in_utf8_turkic_locale (vTHX->Iin_utf8_turkic_locale) |
54aff467 GS |
179 | #define PL_incgv (vTHX->Iincgv) |
180 | #define PL_initav (vTHX->Iinitav) | |
181 | #define PL_inplace (vTHX->Iinplace) | |
f26b33bd | 182 | #define PL_internal_random_state (vTHX->Iinternal_random_state) |
dd69841b | 183 | #define PL_isarev (vTHX->Iisarev) |
3a1ee7e8 | 184 | #define PL_known_layers (vTHX->Iknown_layers) |
f7416781 KW |
185 | #define PL_langinfo_buf (vTHX->Ilanginfo_buf) |
186 | #define PL_langinfo_bufsize (vTHX->Ilanginfo_bufsize) | |
907b3e23 | 187 | #define PL_last_in_gv (vTHX->Ilast_in_gv) |
54aff467 | 188 | #define PL_lastfd (vTHX->Ilastfd) |
907b3e23 | 189 | #define PL_lastgotoprobe (vTHX->Ilastgotoprobe) |
54aff467 GS |
190 | #define PL_laststatval (vTHX->Ilaststatval) |
191 | #define PL_laststype (vTHX->Ilaststype) | |
49d7d366 | 192 | #define PL_lc_numeric_mutex_depth (vTHX->Ilc_numeric_mutex_depth) |
47280b20 | 193 | #define PL_locale_utf8ness (vTHX->Ilocale_utf8ness) |
907b3e23 | 194 | #define PL_localizing (vTHX->Ilocalizing) |
54aff467 | 195 | #define PL_localpatches (vTHX->Ilocalpatches) |
15a5279a | 196 | #define PL_lockhook (vTHX->Ilockhook) |
54aff467 GS |
197 | #define PL_main_cv (vTHX->Imain_cv) |
198 | #define PL_main_root (vTHX->Imain_root) | |
199 | #define PL_main_start (vTHX->Imain_start) | |
907b3e23 DM |
200 | #define PL_mainstack (vTHX->Imainstack) |
201 | #define PL_markstack (vTHX->Imarkstack) | |
202 | #define PL_markstack_max (vTHX->Imarkstack_max) | |
203 | #define PL_markstack_ptr (vTHX->Imarkstack_ptr) | |
54aff467 | 204 | #define PL_max_intro_pending (vTHX->Imax_intro_pending) |
54aff467 | 205 | #define PL_maxsysfd (vTHX->Imaxsysfd) |
d2c9cb53 | 206 | #define PL_mbrlen_ps (vTHX->Imbrlen_ps) |
5a6637f0 | 207 | #define PL_mbrtowc_ps (vTHX->Imbrtowc_ps) |
7cb608b5 | 208 | #define PL_memory_debug_header (vTHX->Imemory_debug_header) |
54aff467 GS |
209 | #define PL_mess_sv (vTHX->Imess_sv) |
210 | #define PL_min_intro_pending (vTHX->Imin_intro_pending) | |
bc9b29db | 211 | #define PL_minus_E (vTHX->Iminus_E) |
54aff467 GS |
212 | #define PL_minus_F (vTHX->Iminus_F) |
213 | #define PL_minus_a (vTHX->Iminus_a) | |
214 | #define PL_minus_c (vTHX->Iminus_c) | |
215 | #define PL_minus_l (vTHX->Iminus_l) | |
216 | #define PL_minus_n (vTHX->Iminus_n) | |
217 | #define PL_minus_p (vTHX->Iminus_p) | |
907b3e23 | 218 | #define PL_modcount (vTHX->Imodcount) |
54aff467 | 219 | #define PL_modglobal (vTHX->Imodglobal) |
fedf30e1 | 220 | #define PL_multideref_pc (vTHX->Imultideref_pc) |
f16dd614 DM |
221 | #define PL_my_cxt_list (vTHX->Imy_cxt_list) |
222 | #define PL_my_cxt_size (vTHX->Imy_cxt_size) | |
907b3e23 | 223 | #define PL_na (vTHX->Ina) |
54aff467 | 224 | #define PL_nomemok (vTHX->Inomemok) |
54aff467 | 225 | #define PL_numeric_name (vTHX->Inumeric_name) |
a453c169 | 226 | #define PL_numeric_radix_sv (vTHX->Inumeric_radix_sv) |
54aff467 | 227 | #define PL_numeric_standard (vTHX->Inumeric_standard) |
892e6465 | 228 | #define PL_numeric_underlying (vTHX->Inumeric_underlying) |
4c68b815 | 229 | #define PL_numeric_underlying_is_standard (vTHX->Inumeric_underlying_is_standard) |
e23d9e2f | 230 | #define PL_ofsgv (vTHX->Iofsgv) |
54aff467 | 231 | #define PL_oldname (vTHX->Ioldname) |
907b3e23 | 232 | #define PL_op (vTHX->Iop) |
75d476e2 | 233 | #define PL_op_exec_cnt (vTHX->Iop_exec_cnt) |
54aff467 | 234 | #define PL_op_mask (vTHX->Iop_mask) |
f37b8c3f | 235 | #define PL_opfreehook (vTHX->Iopfreehook) |
54aff467 GS |
236 | #define PL_origalen (vTHX->Iorigalen) |
237 | #define PL_origargc (vTHX->Iorigargc) | |
238 | #define PL_origargv (vTHX->Iorigargv) | |
239 | #define PL_origenviron (vTHX->Iorigenviron) | |
240 | #define PL_origfilename (vTHX->Iorigfilename) | |
7889fe52 | 241 | #define PL_ors_sv (vTHX->Iors_sv) |
54aff467 GS |
242 | #define PL_osname (vTHX->Iosname) |
243 | #define PL_pad_reset_pending (vTHX->Ipad_reset_pending) | |
244 | #define PL_padix (vTHX->Ipadix) | |
245 | #define PL_padix_floor (vTHX->Ipadix_floor) | |
b4db5868 | 246 | #define PL_padlist_generation (vTHX->Ipadlist_generation) |
12d375ea FC |
247 | #define PL_padname_const (vTHX->Ipadname_const) |
248 | #define PL_padname_undef (vTHX->Ipadname_undef) | |
5912531f | 249 | #define PL_parser (vTHX->Iparser) |
54aff467 | 250 | #define PL_patchlevel (vTHX->Ipatchlevel) |
907b3e23 | 251 | #define PL_peepp (vTHX->Ipeepp) |
54aff467 GS |
252 | #define PL_perl_destruct_level (vTHX->Iperl_destruct_level) |
253 | #define PL_perldb (vTHX->Iperldb) | |
a1ea730d | 254 | #define PL_perlio (vTHX->Iperlio) |
9ebf26ad | 255 | #define PL_phase (vTHX->Iphase) |
54aff467 GS |
256 | #define PL_pidstatus (vTHX->Ipidstatus) |
257 | #define PL_preambleav (vTHX->Ipreambleav) | |
54aff467 | 258 | #define PL_profiledata (vTHX->Iprofiledata) |
1d7c1841 | 259 | #define PL_psig_name (vTHX->Ipsig_name) |
ce08f86c | 260 | #define PL_psig_pend (vTHX->Ipsig_pend) |
1d7c1841 GS |
261 | #define PL_psig_ptr (vTHX->Ipsig_ptr) |
262 | #define PL_ptr_table (vTHX->Iptr_table) | |
3be8f094 | 263 | #define PL_random_state (vTHX->Irandom_state) |
e5dd39fc | 264 | #define PL_reentrant_buffer (vTHX->Ireentrant_buffer) |
0891a229 | 265 | #define PL_reentrant_retint (vTHX->Ireentrant_retint) |
f65e70f5 | 266 | #define PL_reg_curpm (vTHX->Ireg_curpm) |
1fcf4c12 AB |
267 | #define PL_regex_pad (vTHX->Iregex_pad) |
268 | #define PL_regex_padav (vTHX->Iregex_padav) | |
a3e6e81e | 269 | #define PL_registered_mros (vTHX->Iregistered_mros) |
907b3e23 DM |
270 | #define PL_regmatch_slab (vTHX->Iregmatch_slab) |
271 | #define PL_regmatch_state (vTHX->Iregmatch_state) | |
54aff467 | 272 | #define PL_replgv (vTHX->Ireplgv) |
febb3a6d | 273 | #define PL_restartjmpenv (vTHX->Irestartjmpenv) |
907b3e23 | 274 | #define PL_restartop (vTHX->Irestartop) |
1a0a2ba9 | 275 | #define PL_rpeepp (vTHX->Irpeepp) |
907b3e23 | 276 | #define PL_rs (vTHX->Irs) |
54aff467 | 277 | #define PL_runops (vTHX->Irunops) |
aefff11f | 278 | #define PL_savebegin (vTHX->Isavebegin) |
907b3e23 DM |
279 | #define PL_savestack (vTHX->Isavestack) |
280 | #define PL_savestack_ix (vTHX->Isavestack_ix) | |
281 | #define PL_savestack_max (vTHX->Isavestack_max) | |
1a904fc8 | 282 | #ifndef PL_sawampersand |
54aff467 | 283 | #define PL_sawampersand (vTHX->Isawampersand) |
1a904fc8 | 284 | #endif |
907b3e23 DM |
285 | #define PL_scopestack (vTHX->Iscopestack) |
286 | #define PL_scopestack_ix (vTHX->Iscopestack_ix) | |
287 | #define PL_scopestack_max (vTHX->Iscopestack_max) | |
d343c3ef | 288 | #define PL_scopestack_name (vTHX->Iscopestack_name) |
907b3e23 | 289 | #define PL_secondgv (vTHX->Isecondgv) |
9aac5db8 KW |
290 | #define PL_setlocale_buf (vTHX->Isetlocale_buf) |
291 | #define PL_setlocale_bufsize (vTHX->Isetlocale_bufsize) | |
15a5279a | 292 | #define PL_sharehook (vTHX->Isharehook) |
ce08f86c | 293 | #define PL_sig_pending (vTHX->Isig_pending) |
dc37125b DM |
294 | #define PL_sighandler1p (vTHX->Isighandler1p) |
295 | #define PL_sighandler3p (vTHX->Isighandler3p) | |
54aff467 | 296 | #define PL_sighandlerp (vTHX->Isighandlerp) |
92f022bb | 297 | #define PL_signalhook (vTHX->Isignalhook) |
4ffa73a3 | 298 | #define PL_signals (vTHX->Isignals) |
8ba4b24b | 299 | #define PL_sort_RealCmp (vTHX->Isort_RealCmp) |
907b3e23 DM |
300 | #define PL_sortcop (vTHX->Isortcop) |
301 | #define PL_sortstash (vTHX->Isortstash) | |
54aff467 GS |
302 | #define PL_splitstr (vTHX->Isplitstr) |
303 | #define PL_srand_called (vTHX->Isrand_called) | |
907b3e23 DM |
304 | #define PL_stack_base (vTHX->Istack_base) |
305 | #define PL_stack_max (vTHX->Istack_max) | |
306 | #define PL_stack_sp (vTHX->Istack_sp) | |
307 | #define PL_start_env (vTHX->Istart_env) | |
081fc587 | 308 | #define PL_stashcache (vTHX->Istashcache) |
d4d03940 FC |
309 | #define PL_stashpad (vTHX->Istashpad) |
310 | #define PL_stashpadix (vTHX->Istashpadix) | |
311 | #define PL_stashpadmax (vTHX->Istashpadmax) | |
907b3e23 DM |
312 | #define PL_statcache (vTHX->Istatcache) |
313 | #define PL_statgv (vTHX->Istatgv) | |
314 | #define PL_statname (vTHX->Istatname) | |
54aff467 | 315 | #define PL_statusvalue (vTHX->Istatusvalue) |
e5218da5 | 316 | #define PL_statusvalue_posix (vTHX->Istatusvalue_posix) |
54aff467 | 317 | #define PL_statusvalue_vms (vTHX->Istatusvalue_vms) |
bf49b057 | 318 | #define PL_stderrgv (vTHX->Istderrgv) |
54aff467 | 319 | #define PL_stdingv (vTHX->Istdingv) |
54aff467 | 320 | #define PL_strtab (vTHX->Istrtab) |
f28f4d2a | 321 | #define PL_strxfrm_NUL_replacement (vTHX->Istrxfrm_NUL_replacement) |
c664130f | 322 | #define PL_strxfrm_is_behaved (vTHX->Istrxfrm_is_behaved) |
a4a439fb | 323 | #define PL_strxfrm_max_cp (vTHX->Istrxfrm_max_cp) |
54aff467 | 324 | #define PL_sub_generation (vTHX->Isub_generation) |
54aff467 GS |
325 | #define PL_subline (vTHX->Isubline) |
326 | #define PL_subname (vTHX->Isubname) | |
327 | #define PL_sv_arenaroot (vTHX->Isv_arenaroot) | |
a38ab475 | 328 | #define PL_sv_consts (vTHX->Isv_consts) |
54aff467 | 329 | #define PL_sv_count (vTHX->Isv_count) |
7c123f9d | 330 | #define PL_sv_immortals (vTHX->Isv_immortals) |
54aff467 | 331 | #define PL_sv_no (vTHX->Isv_no) |
54aff467 | 332 | #define PL_sv_root (vTHX->Isv_root) |
56b5603e | 333 | #define PL_sv_serial (vTHX->Isv_serial) |
54aff467 GS |
334 | #define PL_sv_undef (vTHX->Isv_undef) |
335 | #define PL_sv_yes (vTHX->Isv_yes) | |
5a6c2837 | 336 | #define PL_sv_zero (vTHX->Isv_zero) |
54aff467 | 337 | #define PL_sys_intern (vTHX->Isys_intern) |
6537fe72 | 338 | #define PL_taint_warn (vTHX->Itaint_warn) |
907b3e23 | 339 | #define PL_tainted (vTHX->Itainted) |
54aff467 | 340 | #define PL_tainting (vTHX->Itainting) |
15a5279a | 341 | #define PL_threadhook (vTHX->Ithreadhook) |
907b3e23 DM |
342 | #define PL_tmps_floor (vTHX->Itmps_floor) |
343 | #define PL_tmps_ix (vTHX->Itmps_ix) | |
344 | #define PL_tmps_max (vTHX->Itmps_max) | |
345 | #define PL_tmps_stack (vTHX->Itmps_stack) | |
907b3e23 DM |
346 | #define PL_top_env (vTHX->Itop_env) |
347 | #define PL_toptarget (vTHX->Itoptarget) | |
e1aa2579 | 348 | #define PL_underlying_numeric_obj (vTHX->Iunderlying_numeric_obj) |
a05d7ebb | 349 | #define PL_unicode (vTHX->Iunicode) |
3c10abe3 AG |
350 | #define PL_unitcheckav (vTHX->Iunitcheckav) |
351 | #define PL_unitcheckav_save (vTHX->Iunitcheckav_save) | |
15a5279a | 352 | #define PL_unlockhook (vTHX->Iunlockhook) |
54aff467 | 353 | #define PL_unsafe (vTHX->Iunsafe) |
a8def808 KW |
354 | #define PL_utf8_charname_begin (vTHX->Iutf8_charname_begin) |
355 | #define PL_utf8_charname_continue (vTHX->Iutf8_charname_continue) | |
356 | #define PL_utf8_idcont (vTHX->Iutf8_idcont) | |
357 | #define PL_utf8_idstart (vTHX->Iutf8_idstart) | |
358 | #define PL_utf8_mark (vTHX->Iutf8_mark) | |
359 | #define PL_utf8_perl_idcont (vTHX->Iutf8_perl_idcont) | |
360 | #define PL_utf8_perl_idstart (vTHX->Iutf8_perl_idstart) | |
361 | #define PL_utf8_tofold (vTHX->Iutf8_tofold) | |
362 | #define PL_utf8_tolower (vTHX->Iutf8_tolower) | |
363 | #define PL_utf8_tosimplefold (vTHX->Iutf8_tosimplefold) | |
364 | #define PL_utf8_totitle (vTHX->Iutf8_totitle) | |
365 | #define PL_utf8_toupper (vTHX->Iutf8_toupper) | |
366 | #define PL_utf8_xidcont (vTHX->Iutf8_xidcont) | |
367 | #define PL_utf8_xidstart (vTHX->Iutf8_xidstart) | |
e07ea26a | 368 | #define PL_utf8cache (vTHX->Iutf8cache) |
fde18df1 | 369 | #define PL_utf8locale (vTHX->Iutf8locale) |
780fcc9f | 370 | #define PL_warn_locale (vTHX->Iwarn_locale) |
54aff467 | 371 | #define PL_warnhook (vTHX->Iwarnhook) |
907b3e23 DM |
372 | #define PL_watchaddr (vTHX->Iwatchaddr) |
373 | #define PL_watchok (vTHX->Iwatchok) | |
5a6637f0 | 374 | #define PL_wcrtomb_ps (vTHX->Iwcrtomb_ps) |
9a189793 | 375 | #define PL_xsubfilename (vTHX->Ixsubfilename) |
54aff467 | 376 | |
54aff467 | 377 | #endif /* MULTIPLICITY */ |
d4cce5f1 | 378 | |
54aff467 | 379 | #if defined(PERL_GLOBAL_STRUCT) |
22239a37 | 380 | |
6ebbc862 KW |
381 | #define PL_C_locale_obj (my_vars->GC_locale_obj) |
382 | #define PL_GC_locale_obj (my_vars->GC_locale_obj) | |
27da23d5 JH |
383 | #define PL_appctx (my_vars->Gappctx) |
384 | #define PL_Gappctx (my_vars->Gappctx) | |
0850138d TC |
385 | #define PL_check (my_vars->Gcheck) |
386 | #define PL_Gcheck (my_vars->Gcheck) | |
e8570548 Z |
387 | #define PL_check_mutex (my_vars->Gcheck_mutex) |
388 | #define PL_Gcheck_mutex (my_vars->Gcheck_mutex) | |
dc37125b DM |
389 | #define PL_csighandler1p (my_vars->Gcsighandler1p) |
390 | #define PL_Gcsighandler1p (my_vars->Gcsighandler1p) | |
391 | #define PL_csighandler3p (my_vars->Gcsighandler3p) | |
392 | #define PL_Gcsighandler3p (my_vars->Gcsighandler3p) | |
27da23d5 JH |
393 | #define PL_csighandlerp (my_vars->Gcsighandlerp) |
394 | #define PL_Gcsighandlerp (my_vars->Gcsighandlerp) | |
395 | #define PL_curinterp (my_vars->Gcurinterp) | |
396 | #define PL_Gcurinterp (my_vars->Gcurinterp) | |
397 | #define PL_do_undump (my_vars->Gdo_undump) | |
398 | #define PL_Gdo_undump (my_vars->Gdo_undump) | |
399 | #define PL_dollarzero_mutex (my_vars->Gdollarzero_mutex) | |
400 | #define PL_Gdollarzero_mutex (my_vars->Gdollarzero_mutex) | |
401 | #define PL_fold_locale (my_vars->Gfold_locale) | |
402 | #define PL_Gfold_locale (my_vars->Gfold_locale) | |
9d5e3f1a YO |
403 | #define PL_hash_chars (my_vars->Ghash_chars) |
404 | #define PL_Ghash_chars (my_vars->Ghash_chars) | |
7dc86639 YO |
405 | #define PL_hash_seed (my_vars->Ghash_seed) |
406 | #define PL_Ghash_seed (my_vars->Ghash_seed) | |
407 | #define PL_hash_seed_set (my_vars->Ghash_seed_set) | |
408 | #define PL_Ghash_seed_set (my_vars->Ghash_seed_set) | |
9d5e3f1a YO |
409 | #define PL_hash_state (my_vars->Ghash_state) |
410 | #define PL_Ghash_state (my_vars->Ghash_state) | |
71ad1b0c NC |
411 | #define PL_hints_mutex (my_vars->Ghints_mutex) |
412 | #define PL_Ghints_mutex (my_vars->Ghints_mutex) | |
4098b6bb JV |
413 | #define PL_keyword_plugin (my_vars->Gkeyword_plugin) |
414 | #define PL_Gkeyword_plugin (my_vars->Gkeyword_plugin) | |
1e5c5f69 LM |
415 | #define PL_keyword_plugin_mutex (my_vars->Gkeyword_plugin_mutex) |
416 | #define PL_Gkeyword_plugin_mutex (my_vars->Gkeyword_plugin_mutex) | |
49d7d366 KW |
417 | #define PL_lc_numeric_mutex (my_vars->Glc_numeric_mutex) |
418 | #define PL_Glc_numeric_mutex (my_vars->Glc_numeric_mutex) | |
929e1213 KW |
419 | #define PL_locale_mutex (my_vars->Glocale_mutex) |
420 | #define PL_Glocale_mutex (my_vars->Glocale_mutex) | |
27da23d5 JH |
421 | #define PL_malloc_mutex (my_vars->Gmalloc_mutex) |
422 | #define PL_Gmalloc_mutex (my_vars->Gmalloc_mutex) | |
423 | #define PL_mmap_page_size (my_vars->Gmmap_page_size) | |
424 | #define PL_Gmmap_page_size (my_vars->Gmmap_page_size) | |
f16dd614 DM |
425 | #define PL_my_ctx_mutex (my_vars->Gmy_ctx_mutex) |
426 | #define PL_Gmy_ctx_mutex (my_vars->Gmy_ctx_mutex) | |
427 | #define PL_my_cxt_index (my_vars->Gmy_cxt_index) | |
428 | #define PL_Gmy_cxt_index (my_vars->Gmy_cxt_index) | |
04912be7 DM |
429 | #define PL_my_cxt_keys (my_vars->Gmy_cxt_keys) |
430 | #define PL_Gmy_cxt_keys (my_vars->Gmy_cxt_keys) | |
431 | #define PL_my_cxt_keys_size (my_vars->Gmy_cxt_keys_size) | |
432 | #define PL_Gmy_cxt_keys_size (my_vars->Gmy_cxt_keys_size) | |
27da23d5 JH |
433 | #define PL_op_mutex (my_vars->Gop_mutex) |
434 | #define PL_Gop_mutex (my_vars->Gop_mutex) | |
435 | #define PL_op_seq (my_vars->Gop_seq) | |
436 | #define PL_Gop_seq (my_vars->Gop_seq) | |
437 | #define PL_op_sequence (my_vars->Gop_sequence) | |
438 | #define PL_Gop_sequence (my_vars->Gop_sequence) | |
27da23d5 JH |
439 | #define PL_perlio_debug_fd (my_vars->Gperlio_debug_fd) |
440 | #define PL_Gperlio_debug_fd (my_vars->Gperlio_debug_fd) | |
441 | #define PL_perlio_fd_refcnt (my_vars->Gperlio_fd_refcnt) | |
442 | #define PL_Gperlio_fd_refcnt (my_vars->Gperlio_fd_refcnt) | |
22c96fc1 NC |
443 | #define PL_perlio_fd_refcnt_size (my_vars->Gperlio_fd_refcnt_size) |
444 | #define PL_Gperlio_fd_refcnt_size (my_vars->Gperlio_fd_refcnt_size) | |
fa36c1f0 RGS |
445 | #define PL_perlio_mutex (my_vars->Gperlio_mutex) |
446 | #define PL_Gperlio_mutex (my_vars->Gperlio_mutex) | |
483efd0a CB |
447 | #ifdef __VMS |
448 | #define PL_perllib_sep (my_vars->Gperllib_sep) | |
449 | #define PL_Gperllib_sep (my_vars->Gperllib_sep) | |
450 | #endif | |
27da23d5 JH |
451 | #define PL_ppaddr (my_vars->Gppaddr) |
452 | #define PL_Gppaddr (my_vars->Gppaddr) | |
0447859b | 453 | #ifdef OS2 |
27da23d5 JH |
454 | #define PL_sh_path (my_vars->Gsh_path) |
455 | #define PL_Gsh_path (my_vars->Gsh_path) | |
0447859b | 456 | #endif |
27da23d5 JH |
457 | #define PL_sig_defaulting (my_vars->Gsig_defaulting) |
458 | #define PL_Gsig_defaulting (my_vars->Gsig_defaulting) | |
459 | #define PL_sig_handlers_initted (my_vars->Gsig_handlers_initted) | |
460 | #define PL_Gsig_handlers_initted (my_vars->Gsig_handlers_initted) | |
461 | #define PL_sig_ignoring (my_vars->Gsig_ignoring) | |
462 | #define PL_Gsig_ignoring (my_vars->Gsig_ignoring) | |
27da23d5 JH |
463 | #define PL_sig_trapped (my_vars->Gsig_trapped) |
464 | #define PL_Gsig_trapped (my_vars->Gsig_trapped) | |
465 | #define PL_sigfpe_saved (my_vars->Gsigfpe_saved) | |
466 | #define PL_Gsigfpe_saved (my_vars->Gsigfpe_saved) | |
999d65ed DM |
467 | #define PL_strategy_accept (my_vars->Gstrategy_accept) |
468 | #define PL_Gstrategy_accept (my_vars->Gstrategy_accept) | |
469 | #define PL_strategy_dup (my_vars->Gstrategy_dup) | |
470 | #define PL_Gstrategy_dup (my_vars->Gstrategy_dup) | |
471 | #define PL_strategy_dup2 (my_vars->Gstrategy_dup2) | |
472 | #define PL_Gstrategy_dup2 (my_vars->Gstrategy_dup2) | |
473 | #define PL_strategy_mkstemp (my_vars->Gstrategy_mkstemp) | |
474 | #define PL_Gstrategy_mkstemp (my_vars->Gstrategy_mkstemp) | |
475 | #define PL_strategy_open (my_vars->Gstrategy_open) | |
476 | #define PL_Gstrategy_open (my_vars->Gstrategy_open) | |
477 | #define PL_strategy_open3 (my_vars->Gstrategy_open3) | |
478 | #define PL_Gstrategy_open3 (my_vars->Gstrategy_open3) | |
479 | #define PL_strategy_pipe (my_vars->Gstrategy_pipe) | |
480 | #define PL_Gstrategy_pipe (my_vars->Gstrategy_pipe) | |
481 | #define PL_strategy_socket (my_vars->Gstrategy_socket) | |
482 | #define PL_Gstrategy_socket (my_vars->Gstrategy_socket) | |
483 | #define PL_strategy_socketpair (my_vars->Gstrategy_socketpair) | |
484 | #define PL_Gstrategy_socketpair (my_vars->Gstrategy_socketpair) | |
27da23d5 JH |
485 | #define PL_sv_placeholder (my_vars->Gsv_placeholder) |
486 | #define PL_Gsv_placeholder (my_vars->Gsv_placeholder) | |
487 | #define PL_thr_key (my_vars->Gthr_key) | |
488 | #define PL_Gthr_key (my_vars->Gthr_key) | |
489 | #define PL_timesbase (my_vars->Gtimesbase) | |
490 | #define PL_Gtimesbase (my_vars->Gtimesbase) | |
491 | #define PL_use_safe_putenv (my_vars->Guse_safe_putenv) | |
492 | #define PL_Guse_safe_putenv (my_vars->Guse_safe_putenv) | |
dd52e3cc KW |
493 | #define PL_user_def_props (my_vars->Guser_def_props) |
494 | #define PL_Guser_def_props (my_vars->Guser_def_props) | |
495 | #define PL_user_def_props_aTHX (my_vars->Guser_def_props_aTHX) | |
496 | #define PL_Guser_def_props_aTHX (my_vars->Guser_def_props_aTHX) | |
8310e7fa KW |
497 | #define PL_user_prop_mutex (my_vars->Guser_prop_mutex) |
498 | #define PL_Guser_prop_mutex (my_vars->Guser_prop_mutex) | |
b74fe592 KW |
499 | #define PL_utf8_foldclosures (my_vars->Gutf8_foldclosures) |
500 | #define PL_Gutf8_foldclosures (my_vars->Gutf8_foldclosures) | |
c301d606 DM |
501 | #define PL_veto_cleanup (my_vars->Gveto_cleanup) |
502 | #define PL_Gveto_cleanup (my_vars->Gveto_cleanup) | |
27da23d5 JH |
503 | #define PL_watch_pvx (my_vars->Gwatch_pvx) |
504 | #define PL_Gwatch_pvx (my_vars->Gwatch_pvx) | |
22239a37 | 505 | |
22239a37 NIS |
506 | #endif /* PERL_GLOBAL_STRUCT */ |
507 | ||
37442d52 | 508 | /* ex: set ro: */ |