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 19 START_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 40 END_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 51 START_EXTERN_C 52 53 #ifndef DOINIT 54 EXT void *PL_force_link_funcs[]; 55 #else 56 EXT 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 77 START_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 893