Integrate with Sarathy.
[p5sagit/p5-mst-13.2.git] / objXSUB.h
index c3faf68..f7d1fd4 100644 (file)
--- a/objXSUB.h
+++ b/objXSUB.h
 #define PL_StdIO               (*Perl_IStdIO_ptr(aTHXo))
 #undef  PL_amagic_generation
 #define PL_amagic_generation   (*Perl_Iamagic_generation_ptr(aTHXo))
-#undef  PL_ampergv
-#define PL_ampergv             (*Perl_Iampergv_ptr(aTHXo))
 #undef  PL_an
 #define PL_an                  (*Perl_Ian_ptr(aTHXo))
 #undef  PL_archpat_auto
 #define PL_archpat_auto                (*Perl_Iarchpat_auto_ptr(aTHXo))
 #undef  PL_argvgv
 #define PL_argvgv              (*Perl_Iargvgv_ptr(aTHXo))
+#undef  PL_argvout_stack
+#define PL_argvout_stack       (*Perl_Iargvout_stack_ptr(aTHXo))
 #undef  PL_argvoutgv
 #define PL_argvoutgv           (*Perl_Iargvoutgv_ptr(aTHXo))
 #undef  PL_basetime
@@ -62,8 +62,6 @@
 #define PL_bufend              (*Perl_Ibufend_ptr(aTHXo))
 #undef  PL_bufptr
 #define PL_bufptr              (*Perl_Ibufptr_ptr(aTHXo))
-#undef  PL_cddir
-#define PL_cddir               (*Perl_Icddir_ptr(aTHXo))
 #undef  PL_collation_ix
 #define PL_collation_ix                (*Perl_Icollation_ix_ptr(aTHXo))
 #undef  PL_collation_name
 #define PL_curthr              (*Perl_Icurthr_ptr(aTHXo))
 #undef  PL_dbargs
 #define PL_dbargs              (*Perl_Idbargs_ptr(aTHXo))
-#undef  PL_debdelim
-#define PL_debdelim            (*Perl_Idebdelim_ptr(aTHXo))
-#undef  PL_debname
-#define PL_debname             (*Perl_Idebname_ptr(aTHXo))
 #undef  PL_debstash
 #define PL_debstash            (*Perl_Idebstash_ptr(aTHXo))
 #undef  PL_debug
 #define PL_defgv               (*Perl_Idefgv_ptr(aTHXo))
 #undef  PL_diehook
 #define PL_diehook             (*Perl_Idiehook_ptr(aTHXo))
-#undef  PL_dlevel
-#define PL_dlevel              (*Perl_Idlevel_ptr(aTHXo))
-#undef  PL_dlmax
-#define PL_dlmax               (*Perl_Idlmax_ptr(aTHXo))
 #undef  PL_doextract
 #define PL_doextract           (*Perl_Idoextract_ptr(aTHXo))
 #undef  PL_doswitches
 #define PL_dowarn              (*Perl_Idowarn_ptr(aTHXo))
 #undef  PL_e_script
 #define PL_e_script            (*Perl_Ie_script_ptr(aTHXo))
-#undef  PL_efloatbuf
-#define PL_efloatbuf           (*Perl_Iefloatbuf_ptr(aTHXo))
-#undef  PL_efloatsize
-#define PL_efloatsize          (*Perl_Iefloatsize_ptr(aTHXo))
 #undef  PL_egid
 #define PL_egid                        (*Perl_Iegid_ptr(aTHXo))
 #undef  PL_endav
 #define PL_fdpid               (*Perl_Ifdpid_ptr(aTHXo))
 #undef  PL_filemode
 #define PL_filemode            (*Perl_Ifilemode_ptr(aTHXo))
-#undef  PL_filter_debug
-#define PL_filter_debug                (*Perl_Ifilter_debug_ptr(aTHXo))
 #undef  PL_forkprocess
 #define PL_forkprocess         (*Perl_Iforkprocess_ptr(aTHXo))
 #undef  PL_formfeed
 #define PL_last_uni            (*Perl_Ilast_uni_ptr(aTHXo))
 #undef  PL_lastfd
 #define PL_lastfd              (*Perl_Ilastfd_ptr(aTHXo))
-#undef  PL_lastsize
-#define PL_lastsize            (*Perl_Ilastsize_ptr(aTHXo))
-#undef  PL_lastspbase
-#define PL_lastspbase          (*Perl_Ilastspbase_ptr(aTHXo))
 #undef  PL_laststatval
 #define PL_laststatval         (*Perl_Ilaststatval_ptr(aTHXo))
 #undef  PL_laststype
 #define PL_laststype           (*Perl_Ilaststype_ptr(aTHXo))
-#undef  PL_leftgv
-#define PL_leftgv              (*Perl_Ileftgv_ptr(aTHXo))
 #undef  PL_lex_brackets
 #define PL_lex_brackets                (*Perl_Ilex_brackets_ptr(aTHXo))
 #undef  PL_lex_brackstack
 #define PL_main_root           (*Perl_Imain_root_ptr(aTHXo))
 #undef  PL_main_start
 #define PL_main_start          (*Perl_Imain_start_ptr(aTHXo))
-#undef  PL_malloc_mutex
-#define PL_malloc_mutex                (*Perl_Imalloc_mutex_ptr(aTHXo))
 #undef  PL_max_intro_pending
 #define PL_max_intro_pending   (*Perl_Imax_intro_pending_ptr(aTHXo))
 #undef  PL_maxo
 #define PL_multi_start         (*Perl_Imulti_start_ptr(aTHXo))
 #undef  PL_multiline
 #define PL_multiline           (*Perl_Imultiline_ptr(aTHXo))
-#undef  PL_mystrk
-#define PL_mystrk              (*Perl_Imystrk_ptr(aTHXo))
 #undef  PL_nexttoke
 #define PL_nexttoke            (*Perl_Inexttoke_ptr(aTHXo))
 #undef  PL_nexttype
 #define PL_ofmt                        (*Perl_Iofmt_ptr(aTHXo))
 #undef  PL_oldbufptr
 #define PL_oldbufptr           (*Perl_Ioldbufptr_ptr(aTHXo))
-#undef  PL_oldlastpm
-#define PL_oldlastpm           (*Perl_Ioldlastpm_ptr(aTHXo))
 #undef  PL_oldname
 #define PL_oldname             (*Perl_Ioldname_ptr(aTHXo))
 #undef  PL_oldoldbufptr
 #define PL_padix               (*Perl_Ipadix_ptr(aTHXo))
 #undef  PL_padix_floor
 #define PL_padix_floor         (*Perl_Ipadix_floor_ptr(aTHXo))
-#undef  PL_parsehook
-#define PL_parsehook           (*Perl_Iparsehook_ptr(aTHXo))
 #undef  PL_patchlevel
 #define PL_patchlevel          (*Perl_Ipatchlevel_ptr(aTHXo))
 #undef  PL_pending_ident
 #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_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_statusvalue         (*Perl_Istatusvalue_ptr(aTHXo))
 #undef  PL_statusvalue_vms
 #define PL_statusvalue_vms     (*Perl_Istatusvalue_vms_ptr(aTHXo))
+#undef  PL_stderrgv
+#define PL_stderrgv            (*Perl_Istderrgv_ptr(aTHXo))
 #undef  PL_stdingv
 #define PL_stdingv             (*Perl_Istdingv_ptr(aTHXo))
-#undef  PL_strchop
-#define PL_strchop             (*Perl_Istrchop_ptr(aTHXo))
+#undef  PL_stopav
+#define PL_stopav              (*Perl_Istopav_ptr(aTHXo))
 #undef  PL_strtab
 #define PL_strtab              (*Perl_Istrtab_ptr(aTHXo))
 #undef  PL_strtab_mutex
 #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_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_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_do_undump           (*Perl_Gdo_undump_ptr(NULL))
 #undef  PL_hexdigit
 #define PL_hexdigit            (*Perl_Ghexdigit_ptr(NULL))
+#undef  PL_malloc_mutex
+#define PL_malloc_mutex                (*Perl_Gmalloc_mutex_ptr(NULL))
 #undef  PL_patleave
 #define PL_patleave            (*Perl_Gpatleave_ptr(NULL))
 
 #define Perl_form_nocontext    pPerl->Perl_form_nocontext
 #undef  form_nocontext
 #define form_nocontext         Perl_form_nocontext
+#undef  Perl_mess_nocontext
+#define Perl_mess_nocontext    pPerl->Perl_mess_nocontext
+#undef  mess_nocontext
+#define mess_nocontext         Perl_mess_nocontext
 #undef  Perl_warn_nocontext
 #define Perl_warn_nocontext    pPerl->Perl_warn_nocontext
 #undef  warn_nocontext
 #define Perl_vdeb              pPerl->Perl_vdeb
 #undef  vdeb
 #define vdeb                   Perl_vdeb
-#undef  Perl_deb_growlevel
-#define Perl_deb_growlevel     pPerl->Perl_deb_growlevel
-#undef  deb_growlevel
-#define deb_growlevel          Perl_deb_growlevel
 #undef  Perl_debprofdump
 #define Perl_debprofdump       pPerl->Perl_debprofdump
 #undef  debprofdump
 #define Perl_do_trans          pPerl->Perl_do_trans
 #undef  do_trans
 #define do_trans               Perl_do_trans
+#undef  Perl_do_vecget
+#define Perl_do_vecget         pPerl->Perl_do_vecget
+#undef  do_vecget
+#define do_vecget              Perl_do_vecget
 #undef  Perl_do_vecset
 #define Perl_do_vecset         pPerl->Perl_do_vecset
 #undef  do_vecset
 #define Perl_mess              pPerl->Perl_mess
 #undef  mess
 #define mess                   Perl_mess
+#undef  Perl_vmess
+#define Perl_vmess             pPerl->Perl_vmess
+#undef  vmess
+#define vmess                  Perl_vmess
+#undef  Perl_qerror
+#define Perl_qerror            pPerl->Perl_qerror
+#undef  qerror
+#define qerror                 Perl_qerror
 #undef  Perl_mg_clear
 #define Perl_mg_clear          pPerl->Perl_mg_clear
 #undef  mg_clear
 #define Perl_save_destructor   pPerl->Perl_save_destructor
 #undef  save_destructor
 #define save_destructor                Perl_save_destructor
+#undef  Perl_save_destructor_x
+#define Perl_save_destructor_x pPerl->Perl_save_destructor_x
+#undef  save_destructor_x
+#define save_destructor_x      Perl_save_destructor_x
 #undef  Perl_save_freesv
 #define Perl_save_freesv       pPerl->Perl_save_freesv
 #undef  save_freesv
 #define Perl_magic_killbackrefs        pPerl->Perl_magic_killbackrefs
 #undef  magic_killbackrefs
 #define magic_killbackrefs     Perl_magic_killbackrefs
+#undef  Perl_newANONATTRSUB
+#define Perl_newANONATTRSUB    pPerl->Perl_newANONATTRSUB
+#undef  newANONATTRSUB
+#define newANONATTRSUB         Perl_newANONATTRSUB
+#undef  Perl_newATTRSUB
+#define Perl_newATTRSUB                pPerl->Perl_newATTRSUB
+#undef  newATTRSUB
+#define newATTRSUB             Perl_newATTRSUB
+#undef  Perl_newMYSUB
+#define Perl_newMYSUB          pPerl->Perl_newMYSUB
+#undef  newMYSUB
+#define newMYSUB               Perl_newMYSUB
+#undef  Perl_my_attrs
+#define Perl_my_attrs          pPerl->Perl_my_attrs
+#undef  my_attrs
+#define my_attrs               Perl_my_attrs
+#undef  Perl_boot_core_xsutils
+#define Perl_boot_core_xsutils pPerl->Perl_boot_core_xsutils
+#undef  boot_core_xsutils
+#define boot_core_xsutils      Perl_boot_core_xsutils
 #if defined(PERL_OBJECT)
 #endif
 #if defined(PERL_IN_AV_C) || defined(PERL_DECL_PROT)
 #define Perl_ck_index          pPerl->Perl_ck_index
 #undef  ck_index
 #define ck_index               Perl_ck_index
+#undef  Perl_ck_join
+#define Perl_ck_join           pPerl->Perl_ck_join
+#undef  ck_join
+#define ck_join                        Perl_ck_join
 #undef  Perl_ck_lengthconst
 #define Perl_ck_lengthconst    pPerl->Perl_ck_lengthconst
 #undef  ck_lengthconst
 #define Perl_pp_leavesub       pPerl->Perl_pp_leavesub
 #undef  pp_leavesub
 #define pp_leavesub            Perl_pp_leavesub
+#undef  Perl_pp_leavesublv
+#define Perl_pp_leavesublv     pPerl->Perl_pp_leavesublv
+#undef  pp_leavesublv
+#define pp_leavesublv          Perl_pp_leavesublv
 #undef  Perl_pp_leavetry
 #define Perl_pp_leavetry       pPerl->Perl_pp_leavetry
 #undef  pp_leavetry