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