X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=objXSUB.h;h=8a0a81e5fd1cb3c4d23c8075a55f529d19e1d963;hb=9bc5fa8de0e98ff1317c3fdc7e35f6e13be0ac35;hp=8d31e9928f89c6e52bdbb690053d20c55f6e2a3f;hpb=954c1994944eafa74aaac1bab94e820b6e447da9;p=p5sagit%2Fp5-mst-13.2.git diff --git a/objXSUB.h b/objXSUB.h index 8d31e99..8a0a81e 100644 --- a/objXSUB.h +++ b/objXSUB.h @@ -13,7 +13,6 @@ /* XXX soon to be eliminated, only a few things in PERLCORE need these now */ #if defined(PERL_IMPLICIT_SYS) -#else #endif #if defined(USE_ITHREADS) # if defined(PERL_IMPLICIT_SYS) @@ -48,6 +47,10 @@ #define Perl_avhv_fetch_ent pPerl->Perl_avhv_fetch_ent #undef avhv_fetch_ent #define avhv_fetch_ent Perl_avhv_fetch_ent +#undef Perl_avhv_store_ent +#define Perl_avhv_store_ent pPerl->Perl_avhv_store_ent +#undef avhv_store_ent +#define avhv_store_ent Perl_avhv_store_ent #undef Perl_avhv_iternext #define Perl_avhv_iternext pPerl->Perl_avhv_iternext #undef avhv_iternext @@ -128,6 +131,10 @@ #define Perl_block_gimme pPerl->Perl_block_gimme #undef block_gimme #define block_gimme Perl_block_gimme +#undef Perl_call_list +#define Perl_call_list pPerl->Perl_call_list +#undef call_list +#define call_list Perl_call_list #undef Perl_cast_ulong #define Perl_cast_ulong pPerl->Perl_cast_ulong #undef cast_ulong @@ -151,6 +158,10 @@ #define my_chsize Perl_my_chsize #endif #if defined(USE_THREADS) +#undef Perl_condpair_magic +#define Perl_condpair_magic pPerl->Perl_condpair_magic +#undef condpair_magic +#define condpair_magic Perl_condpair_magic #endif #undef Perl_croak #define Perl_croak pPerl->Perl_croak @@ -177,6 +188,10 @@ #define Perl_form_nocontext pPerl->Perl_form_nocontext #undef form_nocontext #define form_nocontext Perl_form_nocontext +#undef Perl_load_module_nocontext +#define Perl_load_module_nocontext pPerl->Perl_load_module_nocontext +#undef load_module_nocontext +#define load_module_nocontext Perl_load_module_nocontext #undef Perl_mess_nocontext #define Perl_mess_nocontext pPerl->Perl_mess_nocontext #undef mess_nocontext @@ -214,6 +229,14 @@ #undef fprintf_nocontext #define fprintf_nocontext Perl_fprintf_nocontext #endif +#undef Perl_cv_const_sv +#define Perl_cv_const_sv pPerl->Perl_cv_const_sv +#undef cv_const_sv +#define cv_const_sv Perl_cv_const_sv +#undef Perl_cv_undef +#define Perl_cv_undef pPerl->Perl_cv_undef +#undef cv_undef +#define cv_undef Perl_cv_undef #undef Perl_cx_dump #define Perl_cx_dump pPerl->Perl_cx_dump #undef cx_dump @@ -270,14 +293,30 @@ #define Perl_delimcpy pPerl->Perl_delimcpy #undef delimcpy #define delimcpy Perl_delimcpy +#undef Perl_die +#define Perl_die pPerl->Perl_die +#undef die +#define die Perl_die +#undef Perl_dounwind +#define Perl_dounwind pPerl->Perl_dounwind +#undef dounwind +#define dounwind Perl_dounwind #undef Perl_do_binmode #define Perl_do_binmode pPerl->Perl_do_binmode #undef do_binmode #define do_binmode Perl_do_binmode +#undef Perl_do_close +#define Perl_do_close pPerl->Perl_do_close +#undef do_close +#define do_close Perl_do_close #if !defined(WIN32) #endif #if defined(HAS_MSG) || defined(HAS_SEM) || defined(HAS_SHM) #endif +#undef Perl_do_join +#define Perl_do_join pPerl->Perl_do_join +#undef do_join +#define do_join Perl_do_join #undef Perl_do_open #define Perl_do_open pPerl->Perl_do_open #undef do_open @@ -520,6 +559,10 @@ #define Perl_ibcmp_locale pPerl->Perl_ibcmp_locale #undef ibcmp_locale #define ibcmp_locale Perl_ibcmp_locale +#undef Perl_init_stacks +#define Perl_init_stacks pPerl->Perl_init_stacks +#undef init_stacks +#define init_stacks Perl_init_stacks #undef Perl_instr #define Perl_instr pPerl->Perl_instr #undef instr @@ -660,6 +703,10 @@ #define Perl_to_uni_lower_lc pPerl->Perl_to_uni_lower_lc #undef to_uni_lower_lc #define to_uni_lower_lc Perl_to_uni_lower_lc +#undef Perl_is_utf8_char +#define Perl_is_utf8_char pPerl->Perl_is_utf8_char +#undef is_utf8_char +#define is_utf8_char Perl_is_utf8_char #undef Perl_is_utf8_alnum #define Perl_is_utf8_alnum pPerl->Perl_is_utf8_alnum #undef is_utf8_alnum @@ -720,6 +767,18 @@ #define Perl_is_utf8_mark pPerl->Perl_is_utf8_mark #undef is_utf8_mark #define is_utf8_mark Perl_is_utf8_mark +#undef Perl_leave_scope +#define Perl_leave_scope pPerl->Perl_leave_scope +#undef leave_scope +#define leave_scope Perl_leave_scope +#undef Perl_load_module +#define Perl_load_module pPerl->Perl_load_module +#undef load_module +#define load_module Perl_load_module +#undef Perl_vload_module +#define Perl_vload_module pPerl->Perl_vload_module +#undef vload_module +#define vload_module Perl_vload_module #undef Perl_looks_like_number #define Perl_looks_like_number pPerl->Perl_looks_like_number #undef looks_like_number @@ -778,6 +837,10 @@ #define Perl_mg_size pPerl->Perl_mg_size #undef mg_size #define mg_size Perl_mg_size +#undef Perl_moreswitches +#define Perl_moreswitches pPerl->Perl_moreswitches +#undef moreswitches +#define moreswitches Perl_moreswitches #undef Perl_my_atof #define Perl_my_atof pPerl->Perl_my_atof #undef my_atof @@ -1014,6 +1077,10 @@ #define Perl_newSViv pPerl->Perl_newSViv #undef newSViv #define newSViv Perl_newSViv +#undef Perl_newSVuv +#define Perl_newSVuv pPerl->Perl_newSVuv +#undef newSVuv +#define newSVuv Perl_newSVuv #undef Perl_newSVnv #define Perl_newSVnv pPerl->Perl_newSVnv #undef newSVnv @@ -1050,10 +1117,22 @@ #define Perl_newWHILEOP pPerl->Perl_newWHILEOP #undef newWHILEOP #define newWHILEOP Perl_newWHILEOP +#undef Perl_new_stackinfo +#define Perl_new_stackinfo pPerl->Perl_new_stackinfo +#undef new_stackinfo +#define new_stackinfo Perl_new_stackinfo #undef Perl_ninstr #define Perl_ninstr pPerl->Perl_ninstr #undef ninstr #define ninstr Perl_ninstr +#undef Perl_op_free +#define Perl_op_free pPerl->Perl_op_free +#undef op_free +#define op_free Perl_op_free +#undef Perl_pad_sv +#define Perl_pad_sv pPerl->Perl_pad_sv +#undef pad_sv +#define pad_sv Perl_pad_sv #if defined(PERL_OBJECT) #undef Perl_construct #define Perl_construct pPerl->Perl_construct @@ -1116,6 +1195,14 @@ #define Perl_get_cv pPerl->Perl_get_cv #undef get_cv #define get_cv Perl_get_cv +#undef Perl_init_i18nl10n +#define Perl_init_i18nl10n pPerl->Perl_init_i18nl10n +#undef init_i18nl10n +#define init_i18nl10n Perl_init_i18nl10n +#undef Perl_init_i18nl14n +#define Perl_init_i18nl14n pPerl->Perl_init_i18nl14n +#undef init_i18nl14n +#define init_i18nl14n Perl_init_i18nl14n #undef Perl_new_collate #define Perl_new_collate pPerl->Perl_new_collate #undef new_collate @@ -1144,6 +1231,10 @@ #define Perl_require_pv pPerl->Perl_require_pv #undef require_pv #define require_pv Perl_require_pv +#undef Perl_pmflag +#define Perl_pmflag pPerl->Perl_pmflag +#undef pmflag +#define pmflag Perl_pmflag #undef Perl_pop_scope #define Perl_pop_scope pPerl->Perl_pop_scope #undef pop_scope @@ -1156,10 +1247,46 @@ #define Perl_regdump pPerl->Perl_regdump #undef regdump #define regdump Perl_regdump +#undef Perl_pregexec +#define Perl_pregexec pPerl->Perl_pregexec +#undef pregexec +#define pregexec Perl_pregexec +#undef Perl_pregfree +#define Perl_pregfree pPerl->Perl_pregfree +#undef pregfree +#define pregfree Perl_pregfree +#undef Perl_pregcomp +#define Perl_pregcomp pPerl->Perl_pregcomp +#undef pregcomp +#define pregcomp Perl_pregcomp +#undef Perl_re_intuit_start +#define Perl_re_intuit_start pPerl->Perl_re_intuit_start +#undef re_intuit_start +#define re_intuit_start Perl_re_intuit_start +#undef Perl_re_intuit_string +#define Perl_re_intuit_string pPerl->Perl_re_intuit_string +#undef re_intuit_string +#define re_intuit_string Perl_re_intuit_string +#undef Perl_regexec_flags +#define Perl_regexec_flags pPerl->Perl_regexec_flags +#undef regexec_flags +#define regexec_flags Perl_regexec_flags +#undef Perl_regnext +#define Perl_regnext pPerl->Perl_regnext +#undef regnext +#define regnext Perl_regnext +#undef Perl_repeatcpy +#define Perl_repeatcpy pPerl->Perl_repeatcpy +#undef repeatcpy +#define repeatcpy Perl_repeatcpy #undef Perl_rninstr #define Perl_rninstr pPerl->Perl_rninstr #undef rninstr #define rninstr Perl_rninstr +#undef Perl_rsignal +#define Perl_rsignal pPerl->Perl_rsignal +#undef rsignal +#define rsignal Perl_rsignal #if !defined(HAS_RENAME) #endif #undef Perl_savepv @@ -1302,8 +1429,32 @@ #define Perl_save_threadsv pPerl->Perl_save_threadsv #undef save_threadsv #define save_threadsv Perl_save_threadsv +#undef Perl_scan_bin +#define Perl_scan_bin pPerl->Perl_scan_bin +#undef scan_bin +#define scan_bin Perl_scan_bin +#undef Perl_scan_hex +#define Perl_scan_hex pPerl->Perl_scan_hex +#undef scan_hex +#define scan_hex Perl_scan_hex +#undef Perl_scan_num +#define Perl_scan_num pPerl->Perl_scan_num +#undef scan_num +#define scan_num Perl_scan_num +#undef Perl_scan_oct +#define Perl_scan_oct pPerl->Perl_scan_oct +#undef scan_oct +#define scan_oct Perl_scan_oct +#undef Perl_screaminstr +#define Perl_screaminstr pPerl->Perl_screaminstr +#undef screaminstr +#define screaminstr Perl_screaminstr #if !defined(VMS) #endif +#undef Perl_sharepvn +#define Perl_sharepvn pPerl->Perl_sharepvn +#undef sharepvn +#define sharepvn Perl_sharepvn #undef Perl_stack_grow #define Perl_stack_grow pPerl->Perl_stack_grow #undef stack_grow @@ -1430,6 +1581,10 @@ #undef sv_collxfrm #define sv_collxfrm Perl_sv_collxfrm #endif +#undef Perl_sv_compile_2op +#define Perl_sv_compile_2op pPerl->Perl_sv_compile_2op +#undef sv_compile_2op +#define sv_compile_2op Perl_sv_compile_2op #undef Perl_sv_dec #define Perl_sv_dec pPerl->Perl_sv_dec #undef sv_dec @@ -1450,6 +1605,10 @@ #define Perl_sv_free pPerl->Perl_sv_free #undef sv_free #define sv_free Perl_sv_free +#undef Perl_sv_gets +#define Perl_sv_gets pPerl->Perl_sv_gets +#undef sv_gets +#define sv_gets Perl_sv_gets #undef Perl_sv_grow #define Perl_sv_grow pPerl->Perl_sv_grow #undef sv_grow @@ -1622,6 +1781,18 @@ #define Perl_sv_vsetpvfn pPerl->Perl_sv_vsetpvfn #undef sv_vsetpvfn #define sv_vsetpvfn Perl_sv_vsetpvfn +#undef Perl_str_to_version +#define Perl_str_to_version pPerl->Perl_str_to_version +#undef str_to_version +#define str_to_version Perl_str_to_version +#undef Perl_swash_init +#define Perl_swash_init pPerl->Perl_swash_init +#undef swash_init +#define swash_init Perl_swash_init +#undef Perl_swash_fetch +#define Perl_swash_fetch pPerl->Perl_swash_fetch +#undef swash_fetch +#define swash_fetch Perl_swash_fetch #undef Perl_taint_env #define Perl_taint_env pPerl->Perl_taint_env #undef taint_env @@ -1649,7 +1820,15 @@ #define unlnk Perl_unlnk #endif #if defined(USE_THREADS) +#undef Perl_unlock_condpair +#define Perl_unlock_condpair pPerl->Perl_unlock_condpair +#undef unlock_condpair +#define unlock_condpair Perl_unlock_condpair #endif +#undef Perl_unsharepvn +#define Perl_unsharepvn pPerl->Perl_unsharepvn +#undef unsharepvn +#define unsharepvn Perl_unsharepvn #undef Perl_utf16_to_utf8 #define Perl_utf16_to_utf8 pPerl->Perl_utf16_to_utf8 #undef utf16_to_utf8 @@ -1690,6 +1869,10 @@ #define Perl_vwarner pPerl->Perl_vwarner #undef vwarner #define vwarner Perl_vwarner +#undef Perl_whichsig +#define Perl_whichsig pPerl->Perl_whichsig +#undef whichsig +#define whichsig Perl_whichsig #if defined(USE_PURE_BISON) #else #endif @@ -1698,6 +1881,10 @@ #define Perl_dump_mstats pPerl->Perl_dump_mstats #undef dump_mstats #define dump_mstats Perl_dump_mstats +#undef Perl_get_mstats +#define Perl_get_mstats pPerl->Perl_get_mstats +#undef get_mstats +#define get_mstats Perl_get_mstats #endif #undef Perl_safesysmalloc #define Perl_safesysmalloc pPerl->Perl_safesysmalloc @@ -1851,6 +2038,7 @@ #define Perl_magic_dump pPerl->Perl_magic_dump #undef magic_dump #define magic_dump Perl_magic_dump +#if defined(PERL_FLEXIBLE_EXCEPTIONS) #undef Perl_default_protect #define Perl_default_protect pPerl->Perl_default_protect #undef default_protect @@ -1859,6 +2047,7 @@ #define Perl_vdefault_protect pPerl->Perl_vdefault_protect #undef vdefault_protect #define vdefault_protect Perl_vdefault_protect +#endif #undef Perl_reginitcolors #define Perl_reginitcolors pPerl->Perl_reginitcolors #undef reginitcolors @@ -1887,6 +2076,22 @@ #define Perl_sv_pvbyte pPerl->Perl_sv_pvbyte #undef sv_pvbyte #define sv_pvbyte Perl_sv_pvbyte +#undef Perl_sv_utf8_upgrade +#define Perl_sv_utf8_upgrade pPerl->Perl_sv_utf8_upgrade +#undef sv_utf8_upgrade +#define sv_utf8_upgrade Perl_sv_utf8_upgrade +#undef Perl_sv_utf8_downgrade +#define Perl_sv_utf8_downgrade pPerl->Perl_sv_utf8_downgrade +#undef sv_utf8_downgrade +#define sv_utf8_downgrade Perl_sv_utf8_downgrade +#undef Perl_sv_utf8_encode +#define Perl_sv_utf8_encode pPerl->Perl_sv_utf8_encode +#undef sv_utf8_encode +#define sv_utf8_encode Perl_sv_utf8_encode +#undef Perl_sv_utf8_decode +#define Perl_sv_utf8_decode pPerl->Perl_sv_utf8_decode +#undef sv_utf8_decode +#define sv_utf8_decode Perl_sv_utf8_decode #undef Perl_sv_force_normal #define Perl_sv_force_normal pPerl->Perl_sv_force_normal #undef sv_force_normal @@ -1999,12 +2204,16 @@ #if defined(PERL_IN_PERL_C) || defined(PERL_DECL_PROT) # if defined(IAMSUID) # endif +#if defined(PERL_FLEXIBLE_EXCEPTIONS) +#endif # if defined(USE_THREADS) # endif #endif #if defined(PERL_IN_PP_C) || defined(PERL_DECL_PROT) #endif #if defined(PERL_IN_PP_CTL_C) || defined(PERL_DECL_PROT) +#if defined(PERL_FLEXIBLE_EXCEPTIONS) +#endif #endif #if defined(PERL_IN_PP_HOT_C) || defined(PERL_DECL_PROT) #endif @@ -2021,13 +2230,12 @@ #if defined(PERL_IN_SCOPE_C) || defined(PERL_DECL_PROT) #endif #if defined(PERL_IN_SV_C) || defined(PERL_DECL_PROT) -# if defined(PURIFY) -# else -# endif # if defined(DEBUGGING) # endif #endif #if defined(PERL_IN_TOKE_C) || defined(PERL_DECL_PROT) +#if 0 +#endif # if defined(CRIPPLED_CC) # endif # if defined(PERL_CR_FILTER)