+#define PL_profiledata (*Perl_Iprofiledata_ptr(aTHXo))
+#undef PL_replgv
+#define PL_replgv (*Perl_Ireplgv_ptr(aTHXo))
+#undef PL_rightgv
+#define PL_rightgv (*Perl_Irightgv_ptr(aTHXo))
+#undef PL_rsfp
+#define PL_rsfp (*Perl_Irsfp_ptr(aTHXo))
+#undef PL_rsfp_filters
+#define PL_rsfp_filters (*Perl_Irsfp_filters_ptr(aTHXo))
+#undef PL_runops
+#define PL_runops (*Perl_Irunops_ptr(aTHXo))
+#undef PL_sawampersand
+#define PL_sawampersand (*Perl_Isawampersand_ptr(aTHXo))
+#undef PL_sawstudy
+#define PL_sawstudy (*Perl_Isawstudy_ptr(aTHXo))
+#undef PL_sawvec
+#define PL_sawvec (*Perl_Isawvec_ptr(aTHXo))
+#undef PL_sh_path
+#define PL_sh_path (*Perl_Ish_path_ptr(aTHXo))
+#undef PL_siggv
+#define PL_siggv (*Perl_Isiggv_ptr(aTHXo))
+#undef PL_sighandlerp
+#define PL_sighandlerp (*Perl_Isighandlerp_ptr(aTHXo))
+#undef PL_splitstr
+#define PL_splitstr (*Perl_Isplitstr_ptr(aTHXo))
+#undef PL_srand_called
+#define PL_srand_called (*Perl_Isrand_called_ptr(aTHXo))
+#undef PL_statusvalue
+#define PL_statusvalue (*Perl_Istatusvalue_ptr(aTHXo))
+#undef PL_statusvalue_vms
+#define PL_statusvalue_vms (*Perl_Istatusvalue_vms_ptr(aTHXo))
+#undef PL_stdingv
+#define PL_stdingv (*Perl_Istdingv_ptr(aTHXo))
+#undef PL_strchop
+#define PL_strchop (*Perl_Istrchop_ptr(aTHXo))
+#undef PL_strtab
+#define PL_strtab (*Perl_Istrtab_ptr(aTHXo))
+#undef PL_strtab_mutex
+#define PL_strtab_mutex (*Perl_Istrtab_mutex_ptr(aTHXo))
+#undef PL_sub_generation
+#define PL_sub_generation (*Perl_Isub_generation_ptr(aTHXo))
+#undef PL_sublex_info
+#define PL_sublex_info (*Perl_Isublex_info_ptr(aTHXo))
+#undef PL_subline
+#define PL_subline (*Perl_Isubline_ptr(aTHXo))
+#undef PL_subname
+#define PL_subname (*Perl_Isubname_ptr(aTHXo))
+#undef PL_sv_arenaroot
+#define PL_sv_arenaroot (*Perl_Isv_arenaroot_ptr(aTHXo))
+#undef PL_sv_count
+#define PL_sv_count (*Perl_Isv_count_ptr(aTHXo))
+#undef PL_sv_mutex
+#define PL_sv_mutex (*Perl_Isv_mutex_ptr(aTHXo))
+#undef PL_sv_no
+#define PL_sv_no (*Perl_Isv_no_ptr(aTHXo))
+#undef PL_sv_objcount
+#define PL_sv_objcount (*Perl_Isv_objcount_ptr(aTHXo))
+#undef PL_sv_root
+#define PL_sv_root (*Perl_Isv_root_ptr(aTHXo))
+#undef PL_sv_undef
+#define PL_sv_undef (*Perl_Isv_undef_ptr(aTHXo))
+#undef PL_sv_yes
+#define PL_sv_yes (*Perl_Isv_yes_ptr(aTHXo))
+#undef PL_svref_mutex
+#define PL_svref_mutex (*Perl_Isvref_mutex_ptr(aTHXo))
+#undef PL_sys_intern
+#define PL_sys_intern (*Perl_Isys_intern_ptr(aTHXo))
+#undef PL_tainting
+#define PL_tainting (*Perl_Itainting_ptr(aTHXo))
+#undef PL_thisexpr
+#define PL_thisexpr (*Perl_Ithisexpr_ptr(aTHXo))
+#undef PL_thr_key
+#define PL_thr_key (*Perl_Ithr_key_ptr(aTHXo))
+#undef PL_threadnum
+#define PL_threadnum (*Perl_Ithreadnum_ptr(aTHXo))
+#undef PL_threads_mutex
+#define PL_threads_mutex (*Perl_Ithreads_mutex_ptr(aTHXo))
+#undef PL_threadsv_names
+#define PL_threadsv_names (*Perl_Ithreadsv_names_ptr(aTHXo))
+#undef PL_thrsv
+#define PL_thrsv (*Perl_Ithrsv_ptr(aTHXo))
+#undef PL_tokenbuf
+#define PL_tokenbuf (*Perl_Itokenbuf_ptr(aTHXo))
+#undef PL_uid
+#define PL_uid (*Perl_Iuid_ptr(aTHXo))
+#undef PL_unsafe
+#define PL_unsafe (*Perl_Iunsafe_ptr(aTHXo))
+#undef PL_utf8_alnum
+#define PL_utf8_alnum (*Perl_Iutf8_alnum_ptr(aTHXo))
+#undef PL_utf8_alnumc
+#define PL_utf8_alnumc (*Perl_Iutf8_alnumc_ptr(aTHXo))
+#undef PL_utf8_alpha
+#define PL_utf8_alpha (*Perl_Iutf8_alpha_ptr(aTHXo))
+#undef PL_utf8_ascii
+#define PL_utf8_ascii (*Perl_Iutf8_ascii_ptr(aTHXo))
+#undef PL_utf8_cntrl
+#define PL_utf8_cntrl (*Perl_Iutf8_cntrl_ptr(aTHXo))
+#undef PL_utf8_digit
+#define PL_utf8_digit (*Perl_Iutf8_digit_ptr(aTHXo))
+#undef PL_utf8_graph
+#define PL_utf8_graph (*Perl_Iutf8_graph_ptr(aTHXo))
+#undef PL_utf8_lower
+#define PL_utf8_lower (*Perl_Iutf8_lower_ptr(aTHXo))
+#undef PL_utf8_mark
+#define PL_utf8_mark (*Perl_Iutf8_mark_ptr(aTHXo))
+#undef PL_utf8_print
+#define PL_utf8_print (*Perl_Iutf8_print_ptr(aTHXo))
+#undef PL_utf8_punct
+#define PL_utf8_punct (*Perl_Iutf8_punct_ptr(aTHXo))
+#undef PL_utf8_space
+#define PL_utf8_space (*Perl_Iutf8_space_ptr(aTHXo))
+#undef PL_utf8_tolower
+#define PL_utf8_tolower (*Perl_Iutf8_tolower_ptr(aTHXo))
+#undef PL_utf8_totitle
+#define PL_utf8_totitle (*Perl_Iutf8_totitle_ptr(aTHXo))
+#undef PL_utf8_toupper
+#define PL_utf8_toupper (*Perl_Iutf8_toupper_ptr(aTHXo))
+#undef PL_utf8_upper
+#define PL_utf8_upper (*Perl_Iutf8_upper_ptr(aTHXo))
+#undef PL_utf8_xdigit
+#define PL_utf8_xdigit (*Perl_Iutf8_xdigit_ptr(aTHXo))
+#undef PL_uudmap
+#define PL_uudmap (*Perl_Iuudmap_ptr(aTHXo))
+#undef PL_warnhook
+#define PL_warnhook (*Perl_Iwarnhook_ptr(aTHXo))
+#undef PL_xiv_arenaroot
+#define PL_xiv_arenaroot (*Perl_Ixiv_arenaroot_ptr(aTHXo))
+#undef PL_xiv_root
+#define PL_xiv_root (*Perl_Ixiv_root_ptr(aTHXo))
+#undef PL_xnv_root
+#define PL_xnv_root (*Perl_Ixnv_root_ptr(aTHXo))
+#undef PL_xpv_root
+#define PL_xpv_root (*Perl_Ixpv_root_ptr(aTHXo))
+#undef PL_xpvav_root
+#define PL_xpvav_root (*Perl_Ixpvav_root_ptr(aTHXo))
+#undef PL_xpvbm_root
+#define PL_xpvbm_root (*Perl_Ixpvbm_root_ptr(aTHXo))
+#undef PL_xpvcv_root
+#define PL_xpvcv_root (*Perl_Ixpvcv_root_ptr(aTHXo))
+#undef PL_xpvhv_root
+#define PL_xpvhv_root (*Perl_Ixpvhv_root_ptr(aTHXo))
+#undef PL_xpviv_root
+#define PL_xpviv_root (*Perl_Ixpviv_root_ptr(aTHXo))
+#undef PL_xpvlv_root
+#define PL_xpvlv_root (*Perl_Ixpvlv_root_ptr(aTHXo))
+#undef PL_xpvmg_root
+#define PL_xpvmg_root (*Perl_Ixpvmg_root_ptr(aTHXo))
+#undef PL_xpvnv_root
+#define PL_xpvnv_root (*Perl_Ixpvnv_root_ptr(aTHXo))
+#undef PL_xrv_root
+#define PL_xrv_root (*Perl_Ixrv_root_ptr(aTHXo))
+#undef PL_yychar
+#define PL_yychar (*Perl_Iyychar_ptr(aTHXo))
+#undef PL_yydebug
+#define PL_yydebug (*Perl_Iyydebug_ptr(aTHXo))
+#undef PL_yyerrflag
+#define PL_yyerrflag (*Perl_Iyyerrflag_ptr(aTHXo))
+#undef PL_yylval
+#define PL_yylval (*Perl_Iyylval_ptr(aTHXo))
+#undef PL_yynerrs
+#define PL_yynerrs (*Perl_Iyynerrs_ptr(aTHXo))
+#undef PL_yyval
+#define PL_yyval (*Perl_Iyyval_ptr(aTHXo))
+#undef PL_Sv
+#define PL_Sv (*Perl_TSv_ptr(aTHXo))
+#undef PL_Xpv
+#define PL_Xpv (*Perl_TXpv_ptr(aTHXo))
+#undef PL_av_fetch_sv
+#define PL_av_fetch_sv (*Perl_Tav_fetch_sv_ptr(aTHXo))
+#undef PL_bodytarget
+#define PL_bodytarget (*Perl_Tbodytarget_ptr(aTHXo))
+#undef PL_bostr
+#define PL_bostr (*Perl_Tbostr_ptr(aTHXo))
+#undef PL_chopset
+#define PL_chopset (*Perl_Tchopset_ptr(aTHXo))
+#undef PL_colors
+#define PL_colors (*Perl_Tcolors_ptr(aTHXo))
+#undef PL_colorset
+#define PL_colorset (*Perl_Tcolorset_ptr(aTHXo))
+#undef PL_curcop
+#define PL_curcop (*Perl_Tcurcop_ptr(aTHXo))
+#undef PL_curpad
+#define PL_curpad (*Perl_Tcurpad_ptr(aTHXo))
+#undef PL_curpm
+#define PL_curpm (*Perl_Tcurpm_ptr(aTHXo))
+#undef PL_curstack
+#define PL_curstack (*Perl_Tcurstack_ptr(aTHXo))
+#undef PL_curstackinfo
+#define PL_curstackinfo (*Perl_Tcurstackinfo_ptr(aTHXo))
+#undef PL_curstash
+#define PL_curstash (*Perl_Tcurstash_ptr(aTHXo))
+#undef PL_defoutgv
+#define PL_defoutgv (*Perl_Tdefoutgv_ptr(aTHXo))
+#undef PL_defstash
+#define PL_defstash (*Perl_Tdefstash_ptr(aTHXo))
+#undef PL_delaymagic
+#define PL_delaymagic (*Perl_Tdelaymagic_ptr(aTHXo))
+#undef PL_dirty
+#define PL_dirty (*Perl_Tdirty_ptr(aTHXo))
+#undef PL_dumpindent
+#define PL_dumpindent (*Perl_Tdumpindent_ptr(aTHXo))
+#undef PL_efloatbuf
+#define PL_efloatbuf (*Perl_Tefloatbuf_ptr(aTHXo))
+#undef PL_efloatsize
+#define PL_efloatsize (*Perl_Tefloatsize_ptr(aTHXo))
+#undef PL_errors
+#define PL_errors (*Perl_Terrors_ptr(aTHXo))
+#undef PL_extralen
+#define PL_extralen (*Perl_Textralen_ptr(aTHXo))
+#undef PL_firstgv
+#define PL_firstgv (*Perl_Tfirstgv_ptr(aTHXo))
+#undef PL_formtarget
+#define PL_formtarget (*Perl_Tformtarget_ptr(aTHXo))
+#undef PL_hv_fetch_ent_mh
+#define PL_hv_fetch_ent_mh (*Perl_Thv_fetch_ent_mh_ptr(aTHXo))
+#undef PL_hv_fetch_sv
+#define PL_hv_fetch_sv (*Perl_Thv_fetch_sv_ptr(aTHXo))
+#undef PL_in_eval
+#define PL_in_eval (*Perl_Tin_eval_ptr(aTHXo))
+#undef PL_last_in_gv
+#define PL_last_in_gv (*Perl_Tlast_in_gv_ptr(aTHXo))
+#undef PL_lastgotoprobe
+#define PL_lastgotoprobe (*Perl_Tlastgotoprobe_ptr(aTHXo))
+#undef PL_lastscream
+#define PL_lastscream (*Perl_Tlastscream_ptr(aTHXo))
+#undef PL_localizing
+#define PL_localizing (*Perl_Tlocalizing_ptr(aTHXo))
+#undef PL_mainstack
+#define PL_mainstack (*Perl_Tmainstack_ptr(aTHXo))
+#undef PL_markstack
+#define PL_markstack (*Perl_Tmarkstack_ptr(aTHXo))
+#undef PL_markstack_max
+#define PL_markstack_max (*Perl_Tmarkstack_max_ptr(aTHXo))
+#undef PL_markstack_ptr
+#define PL_markstack_ptr (*Perl_Tmarkstack_ptr_ptr(aTHXo))
+#undef PL_maxscream
+#define PL_maxscream (*Perl_Tmaxscream_ptr(aTHXo))
+#undef PL_modcount
+#define PL_modcount (*Perl_Tmodcount_ptr(aTHXo))
+#undef PL_na
+#define PL_na (*Perl_Tna_ptr(aTHXo))
+#undef PL_nrs
+#define PL_nrs (*Perl_Tnrs_ptr(aTHXo))
+#undef PL_ofs
+#define PL_ofs (*Perl_Tofs_ptr(aTHXo))
+#undef PL_ofslen
+#define PL_ofslen (*Perl_Tofslen_ptr(aTHXo))
+#undef PL_op
+#define PL_op (*Perl_Top_ptr(aTHXo))
+#undef PL_opsave
+#define PL_opsave (*Perl_Topsave_ptr(aTHXo))