X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embed.h;h=494b2dbea78c804a22c197eed6cb66fbfe6bf84e;hb=d1bf51ddeaafef1b94a1f5c011bdefbb8ebf5604;hp=196a0b827525ec938fb456feaf01e498c4886566;hpb=748a93069b3d16374a9859d1456065dd3ae11394;p=p5sagit%2Fp5-mst-13.2.git diff --git a/embed.h b/embed.h index 196a0b8..494b2db 100644 --- a/embed.h +++ b/embed.h @@ -1,13 +1,27 @@ -/* This file is derived from global.sym and interp.sym */ +/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + This file is built by embed.pl from global.sym and interp.sym. + Any changes made here will be lost +*/ /* (Doing namespace management portably in C is really gross.) */ +/* EMBED has no run-time penalty, but helps keep the Perl namespace + from colliding with that used by other libraries pulled in + by extensions or by embedding perl. Allow a cc -DNO_EMBED + override, however, to keep binary compatability with previous + versions of perl. +*/ +#ifndef NO_EMBED +# define EMBED 1 +#endif + #ifdef EMBED /* globals we need to hide from the world */ #define AMG_names Perl_AMG_names #define No Perl_No #define Sv Perl_Sv +#define He Perl_He #define Xpv Perl_Xpv #define Yes Perl_Yes #define abs_amg Perl_abs_amg @@ -17,7 +31,6 @@ #define amagic_generation Perl_amagic_generation #define an Perl_an #define atan2_amg Perl_atan2_amg -#define autoboot_preamble Perl_autoboot_preamble #define band_amg Perl_band_amg #define bool__amg Perl_bool__amg #define bor_amg Perl_bor_amg @@ -26,30 +39,32 @@ #define bufptr Perl_bufptr #define bxor_amg Perl_bxor_amg #define check Perl_check -#define coeff Perl_coeff #define compiling Perl_compiling #define compl_amg Perl_compl_amg #define compcv Perl_compcv #define comppad Perl_comppad #define comppad_name Perl_comppad_name #define comppad_name_fill Perl_comppad_name_fill +#define comppad_name_floor Perl_comppad_name_floor #define concat_amg Perl_concat_amg #define concat_ass_amg Perl_concat_ass_amg #define cop_seqmax Perl_cop_seqmax #define cos_amg Perl_cos_amg #define cryptseen Perl_cryptseen -#define cryptswitch_add Perl_cryptswitch_add -#define cryptswitch_fp Perl_cryptswitch_fp #define cshlen Perl_cshlen #define cshname Perl_cshname #define curcop Perl_curcop +#define curcopdb Perl_curcopdb #define curinterp Perl_curinterp #define curpad Perl_curpad +#define cv_const_sv Perl_cv_const_sv #define dc Perl_dc +#define debug Perl_debug #define dec_amg Perl_dec_amg #define di Perl_di #define div_amg Perl_div_amg #define div_ass_amg Perl_div_ass_amg +#define do_undump Perl_do_undump #define ds Perl_ds #define egid Perl_egid #define envgv Perl_envgv @@ -61,6 +76,9 @@ #define expect Perl_expect #define expectterm Perl_expectterm #define fallback_amg Perl_fallback_amg +#define filter_add Perl_filter_add +#define filter_del Perl_filter_del +#define filter_read Perl_filter_read #define fold Perl_fold #define freq Perl_freq #define ge_amg Perl_ge_amg @@ -70,6 +88,7 @@ #define hints Perl_hints #define in_my Perl_in_my #define inc_amg Perl_inc_amg +#define io_close Perl_io_close #define know_next Perl_know_next #define last_lop Perl_last_lop #define last_lop_op Perl_last_lop_op @@ -99,6 +118,7 @@ #define markstack Perl_markstack #define markstack_max Perl_markstack_max #define markstack_ptr Perl_markstack_ptr +#define maxo Perl_maxo #define max_intro_pending Perl_max_intro_pending #define min_intro_pending Perl_min_intro_pending #define mod_amg Perl_mod_amg @@ -136,17 +156,22 @@ #define oldbufptr Perl_oldbufptr #define oldoldbufptr Perl_oldoldbufptr #define op Perl_op +#define op_desc Perl_op_desc #define op_name Perl_op_name #define op_seqmax Perl_op_seqmax #define opargs Perl_opargs #define origalen Perl_origalen #define origenviron Perl_origenviron +#define osname Perl_osname #define padix Perl_padix #define patleave Perl_patleave #define pow_amg Perl_pow_amg #define pow_ass_amg Perl_pow_ass_amg #define ppaddr Perl_ppaddr #define profiledata Perl_profiledata +#define provide_ref Perl_provide_ref +#define psig_ptr Perl_psig_ptr +#define psig_name Perl_psig_name #define qrt_amg Perl_qrt_amg #define rcsid Perl_rcsid #define reall_srchlen Perl_reall_srchlen @@ -158,6 +183,7 @@ #define regeol Perl_regeol #define regfold Perl_regfold #define reginput Perl_reginput +#define regkind Perl_regkind #define reglastparen Perl_reglastparen #define regmyendp Perl_regmyendp #define regmyp_size Perl_regmyp_size @@ -179,8 +205,10 @@ #define retstack_ix Perl_retstack_ix #define retstack_max Perl_retstack_max #define rsfp Perl_rsfp +#define rsfp_filters Perl_rsfp_filters #define rshift_amg Perl_rshift_amg #define rshift_ass_amg Perl_rshift_ass_amg +#define save_pptr Perl_save_pptr #define savestack Perl_savestack #define savestack_ix Perl_savestack_ix #define savestack_max Perl_savestack_max @@ -194,6 +222,7 @@ #define sge_amg Perl_sge_amg #define sgt_amg Perl_sgt_amg #define sig_name Perl_sig_name +#define sig_num Perl_sig_num #define siggv Perl_siggv #define sighandler Perl_sighandler #define simple Perl_simple @@ -201,7 +230,6 @@ #define sle_amg Perl_sle_amg #define slt_amg Perl_slt_amg #define sne_amg Perl_sne_amg -#define stack Perl_stack #define stack_base Perl_stack_base #define stack_max Perl_stack_max #define stack_sp Perl_stack_sp @@ -265,10 +293,14 @@ #define yysindex Perl_yysindex #define yytable Perl_yytable #define yyval Perl_yyval +#define Gv_AMupdate Perl_Gv_AMupdate +#define amagic_call Perl_amagic_call #define append_elem Perl_append_elem #define append_list Perl_append_list #define apply Perl_apply +#define assertref Perl_assertref #define av_clear Perl_av_clear +#define av_extend Perl_av_extend #define av_fake Perl_av_fake #define av_fetch Perl_av_fetch #define av_fill Perl_av_fill @@ -285,10 +317,12 @@ #define block_start Perl_block_start #define calllist Perl_calllist #define cando Perl_cando +#define cast_ulong Perl_cast_ulong #define check_uni Perl_check_uni #define checkcomma Perl_checkcomma #define ck_aelem Perl_ck_aelem #define ck_concat Perl_ck_concat +#define ck_delete Perl_ck_delete #define ck_eof Perl_ck_eof #define ck_eval Perl_ck_eval #define ck_exec Perl_ck_exec @@ -305,7 +339,9 @@ #define ck_match Perl_ck_match #define ck_null Perl_ck_null #define ck_repeat Perl_ck_repeat +#define ck_require Perl_ck_require #define ck_retarget Perl_ck_retarget +#define ck_rfun Perl_ck_rfun #define ck_rvconst Perl_ck_rvconst #define ck_select Perl_ck_select #define ck_shift Perl_ck_shift @@ -313,21 +349,26 @@ #define ck_spair Perl_ck_spair #define ck_split Perl_ck_split #define ck_subr Perl_ck_subr +#define ck_svconst Perl_ck_svconst #define ck_trunc Perl_ck_trunc #define convert Perl_convert #define cpytill Perl_cpytill #define croak Perl_croak +#define cv_clone Perl_cv_clone #define cv_undef Perl_cv_undef +#define cx_dump Perl_cx_dump #define cxinc Perl_cxinc #define deb Perl_deb #define deb_growlevel Perl_deb_growlevel #define debop Perl_debop +#define debprofdump Perl_debprofdump #define debstack Perl_debstack #define debstackptrs Perl_debstackptrs #define deprecate Perl_deprecate #define die Perl_die #define die_where Perl_die_where #define do_aexec Perl_do_aexec +#define do_chomp Perl_do_chomp #define do_chop Perl_do_chop #define do_close Perl_do_close #define do_eof Perl_do_eof @@ -343,7 +384,6 @@ #define do_pipe Perl_do_pipe #define do_print Perl_do_print #define do_readline Perl_do_readline -#define do_chomp Perl_do_chomp #define do_seek Perl_do_seek #define do_semop Perl_do_semop #define do_shmio Perl_do_shmio @@ -355,9 +395,14 @@ #define doeval Perl_doeval #define dofindlabel Perl_dofindlabel #define dopoptoeval Perl_dopoptoeval +#define dounwind Perl_dounwind +#define dowantarray Perl_dowantarray #define dump_all Perl_dump_all #define dump_eval Perl_dump_eval +#define dump_fds Perl_dump_fds +#define dump_form Perl_dump_form #define dump_gv Perl_dump_gv +#define dump_mstats Perl_dump_mstats #define dump_op Perl_dump_op #define dump_packsubs Perl_dump_packsubs #define dump_pm Perl_dump_pm @@ -366,8 +411,12 @@ #define fbm_instr Perl_fbm_instr #define fetch_gv Perl_fetch_gv #define fetch_io Perl_fetch_io +#define filter_add Perl_filter_add +#define filter_del Perl_filter_del +#define filter_read Perl_filter_read #define fold_constants Perl_fold_constants #define force_ident Perl_force_ident +#define force_list Perl_force_list #define force_next Perl_force_next #define force_word Perl_force_word #define free_tmps Perl_free_tmps @@ -376,6 +425,7 @@ #define gp_ref Perl_gp_ref #define gv_AVadd Perl_gv_AVadd #define gv_HVadd Perl_gv_HVadd +#define gv_IOadd Perl_gv_IOadd #define gv_check Perl_gv_check #define gv_efullname Perl_gv_efullname #define gv_fetchfile Perl_gv_fetchfile @@ -385,22 +435,29 @@ #define gv_fullname Perl_gv_fullname #define gv_init Perl_gv_init #define gv_stashpv Perl_gv_stashpv +#define gv_stashpvn Perl_gv_stashpvn #define gv_stashsv Perl_gv_stashsv #define he_delayfree Perl_he_delayfree #define he_free Perl_he_free +#define he_root Perl_he_root #define hoistmust Perl_hoistmust #define hv_clear Perl_hv_clear #define hv_delete Perl_hv_delete +#define hv_delete_ent Perl_hv_delete_ent #define hv_exists Perl_hv_exists +#define hv_exists_ent Perl_hv_exists_ent #define hv_fetch Perl_hv_fetch -#define hv_stashpv Perl_hv_stashpv +#define hv_fetch_ent Perl_hv_fetch_ent #define hv_iterinit Perl_hv_iterinit #define hv_iterkey Perl_hv_iterkey +#define hv_iterkeysv Perl_hv_iterkeysv #define hv_iternext Perl_hv_iternext #define hv_iternextsv Perl_hv_iternextsv #define hv_iterval Perl_hv_iterval #define hv_magic Perl_hv_magic +#define hv_stashpv Perl_hv_stashpv #define hv_store Perl_hv_store +#define hv_store_ent Perl_hv_store_ent #define hv_undef Perl_hv_undef #define ibcmp Perl_ibcmp #define ingroup Perl_ingroup @@ -417,12 +474,16 @@ #define listkids Perl_listkids #define localize Perl_localize #define looks_like_number Perl_looks_like_number +#define magic_clearenv Perl_magic_clearenv #define magic_clearpack Perl_magic_clearpack +#define magic_clearsig Perl_magic_clearsig +#define magic_existspack Perl_magic_existspack #define magic_get Perl_magic_get #define magic_getarylen Perl_magic_getarylen #define magic_getglob Perl_magic_getglob #define magic_getpack Perl_magic_getpack #define magic_getpos Perl_magic_getpos +#define magic_getsig Perl_magic_getsig #define magic_gettaint Perl_magic_gettaint #define magic_getuvar Perl_magic_getuvar #define magic_len Perl_magic_len @@ -458,22 +519,30 @@ #define mod Perl_mod #define modkids Perl_modkids #define moreswitches Perl_moreswitches +#define mstats Perl_mstats #define my Perl_my +#define my_bcopy Perl_my_bcopy +#define my_bzero Perl_my_bzero +#define my_chsize Perl_my_chsize #define my_exit Perl_my_exit +#define my_htonl Perl_my_htonl #define my_lstat Perl_my_lstat +#define my_memcmp Perl_my_memcmp +#define my_ntohl Perl_my_ntohl #define my_pclose Perl_my_pclose #define my_popen Perl_my_popen #define my_setenv Perl_my_setenv #define my_stat Perl_my_stat +#define my_swap Perl_my_swap #define my_unexec Perl_my_unexec #define newANONHASH Perl_newANONHASH #define newANONLIST Perl_newANONLIST +#define newANONSUB Perl_newANONSUB #define newASSIGNOP Perl_newASSIGNOP #define newAV Perl_newAV #define newAVREF Perl_newAVREF #define newBINOP Perl_newBINOP #define newCONDOP Perl_newCONDOP -#define newCVOP Perl_newCVOP #define newCVREF Perl_newCVREF #define newFORM Perl_newFORM #define newFOROP Perl_newFOROP @@ -487,11 +556,10 @@ #define newLOGOP Perl_newLOGOP #define newLOOPEX Perl_newLOOPEX #define newLOOPOP Perl_newLOOPOP -#define newMETHOD Perl_newMETHOD #define newNULLLIST Perl_newNULLLIST #define newOP Perl_newOP -#define newPROG Perl_newPROG #define newPMOP Perl_newPMOP +#define newPROG Perl_newPROG #define newPVOP Perl_newPVOP #define newRANGE Perl_newRANGE #define newRV Perl_newRV @@ -504,11 +572,12 @@ #define newSViv Perl_newSViv #define newSVnv Perl_newSVnv #define newSVpv Perl_newSVpv +#define newSVrv Perl_newSVrv #define newSVsv Perl_newSVsv #define newUNOP Perl_newUNOP #define newWHILEOP Perl_newWHILEOP -#define newXSUB Perl_newXSUB #define newXS Perl_newXS +#define newXSUB Perl_newXSUB #define nextargv Perl_nextargv #define ninstr Perl_ninstr #define no_fh_allowed Perl_no_fh_allowed @@ -528,11 +597,13 @@ #define pad_swipe Perl_pad_swipe #define peep Perl_peep #define pidgone Perl_pidgone +#define pmflag Perl_pmflag #define pmruntime Perl_pmruntime #define pmtrans Perl_pmtrans #define pop_return Perl_pop_return #define pop_scope Perl_pop_scope #define pp_aassign Perl_pp_aassign +#define pp_abs Perl_pp_abs #define pp_accept Perl_pp_accept #define pp_add Perl_pp_add #define pp_aelem Perl_pp_aelem @@ -540,6 +611,7 @@ #define pp_alarm Perl_pp_alarm #define pp_and Perl_pp_and #define pp_andassign Perl_pp_andassign +#define pp_anoncode Perl_pp_anoncode #define pp_anonhash Perl_pp_anonhash #define pp_anonlist Perl_pp_anonlist #define pp_aslice Perl_pp_aslice @@ -550,12 +622,15 @@ #define pp_binmode Perl_pp_binmode #define pp_bit_and Perl_pp_bit_and #define pp_bit_or Perl_pp_bit_or +#define pp_bit_xor Perl_pp_bit_xor #define pp_bless Perl_pp_bless #define pp_caller Perl_pp_caller #define pp_chdir Perl_pp_chdir #define pp_chmod Perl_pp_chmod +#define pp_chomp Perl_pp_chomp #define pp_chop Perl_pp_chop #define pp_chown Perl_pp_chown +#define pp_chr Perl_pp_chr #define pp_chroot Perl_pp_chroot #define pp_close Perl_pp_close #define pp_closedir Perl_pp_closedir @@ -633,6 +708,7 @@ #define pp_fttty Perl_pp_fttty #define pp_ftzero Perl_pp_ftzero #define pp_ge Perl_pp_ge +#define pp_gelem Perl_pp_gelem #define pp_getc Perl_pp_getc #define pp_getlogin Perl_pp_getlogin #define pp_getpeername Perl_pp_getpeername @@ -670,6 +746,19 @@ #define pp_helem Perl_pp_helem #define pp_hex Perl_pp_hex #define pp_hslice Perl_pp_hslice +#define pp_i_add Perl_pp_i_add +#define pp_i_divide Perl_pp_i_divide +#define pp_i_eq Perl_pp_i_eq +#define pp_i_ge Perl_pp_i_ge +#define pp_i_gt Perl_pp_i_gt +#define pp_i_le Perl_pp_i_le +#define pp_i_lt Perl_pp_i_lt +#define pp_i_modulo Perl_pp_i_modulo +#define pp_i_multiply Perl_pp_i_multiply +#define pp_i_ncmp Perl_pp_i_ncmp +#define pp_i_ne Perl_pp_i_ne +#define pp_i_negate Perl_pp_i_negate +#define pp_i_subtract Perl_pp_i_subtract #define pp_index Perl_pp_index #define pp_indread Perl_pp_indread #define pp_int Perl_pp_int @@ -701,6 +790,8 @@ #define pp_lstat Perl_pp_lstat #define pp_lt Perl_pp_lt #define pp_map Perl_pp_map +#define pp_mapstart Perl_pp_mapstart +#define pp_mapwhile Perl_pp_mapwhile #define pp_match Perl_pp_match #define pp_method Perl_pp_method #define pp_mkdir Perl_pp_mkdir @@ -725,6 +816,7 @@ #define pp_orassign Perl_pp_orassign #define pp_ord Perl_pp_ord #define pp_pack Perl_pp_pack +#define pp_padany Perl_pp_padany #define pp_padav Perl_pp_padav #define pp_padhv Perl_pp_padhv #define pp_padsv Perl_pp_padsv @@ -737,10 +829,12 @@ #define pp_predec Perl_pp_predec #define pp_preinc Perl_pp_preinc #define pp_print Perl_pp_print +#define pp_prototype Perl_pp_prototype #define pp_prtf Perl_pp_prtf #define pp_push Perl_pp_push #define pp_pushmark Perl_pp_pushmark #define pp_pushre Perl_pp_pushre +#define pp_quotemeta Perl_pp_quotemeta #define pp_rand Perl_pp_rand #define pp_range Perl_pp_range #define pp_rcatline Perl_pp_rcatline @@ -769,9 +863,9 @@ #define pp_rv2gv Perl_pp_rv2gv #define pp_rv2hv Perl_pp_rv2hv #define pp_rv2sv Perl_pp_rv2sv -#define pp_chomp Perl_pp_chomp #define pp_sassign Perl_pp_sassign #define pp_scalar Perl_pp_scalar +#define pp_schomp Perl_pp_schomp #define pp_schop Perl_pp_schop #define pp_scmp Perl_pp_scmp #define pp_scope Perl_pp_scope @@ -812,26 +906,27 @@ #define pp_sqrt Perl_pp_sqrt #define pp_srand Perl_pp_srand #define pp_srefgen Perl_pp_srefgen -#define pp_schomp Perl_pp_schomp #define pp_sselect Perl_pp_sselect #define pp_sservent Perl_pp_sservent #define pp_ssockopt Perl_pp_ssockopt #define pp_stat Perl_pp_stat +#define pp_stringify Perl_pp_stringify #define pp_stub Perl_pp_stub #define pp_study Perl_pp_study #define pp_subst Perl_pp_subst #define pp_substcont Perl_pp_substcont #define pp_substr Perl_pp_substr #define pp_subtract Perl_pp_subtract -#define pp_sv2len Perl_pp_sv2len #define pp_symlink Perl_pp_symlink #define pp_syscall Perl_pp_syscall +#define pp_sysopen Perl_pp_sysopen #define pp_sysread Perl_pp_sysread #define pp_system Perl_pp_system #define pp_syswrite Perl_pp_syswrite #define pp_tell Perl_pp_tell #define pp_telldir Perl_pp_telldir #define pp_tie Perl_pp_tie +#define pp_tied Perl_pp_tied #define pp_time Perl_pp_time #define pp_tms Perl_pp_tms #define pp_trans Perl_pp_trans @@ -853,28 +948,28 @@ #define pp_wantarray Perl_pp_wantarray #define pp_warn Perl_pp_warn #define pp_xor Perl_pp_xor +#define pregcomp Perl_pregcomp +#define pregexec Perl_pregexec +#define pregfree Perl_pregfree #define prepend_elem Perl_prepend_elem #define push_return Perl_push_return #define push_scope Perl_push_scope #define q Perl_q #define ref Perl_ref #define refkids Perl_refkids -#define regcomp Perl_regcomp #define regdump Perl_regdump -#define regexec Perl_regexec -#define regfree Perl_regfree #define regnext Perl_regnext #define regprop Perl_regprop #define repeatcpy Perl_repeatcpy #define rninstr Perl_rninstr -#define run Perl_run -#define savepv Perl_savepv -#define savepvn Perl_savepvn +#define runops Perl_runops +#define same_dirent Perl_same_dirent #define save_I32 Perl_save_I32 #define save_aptr Perl_save_aptr #define save_ary Perl_save_ary #define save_clearsv Perl_save_clearsv #define save_delete Perl_save_delete +#define save_destructor Perl_save_destructor #define save_freeop Perl_save_freeop #define save_freepv Perl_save_freepv #define save_freesv Perl_save_freesv @@ -883,10 +978,14 @@ #define save_int Perl_save_int #define save_item Perl_save_item #define save_list Perl_save_list +#define save_long Perl_save_long #define save_nogv Perl_save_nogv +#define save_pptr Perl_save_pptr #define save_scalar Perl_save_scalar #define save_sptr Perl_save_sptr #define save_svref Perl_save_svref +#define savepv Perl_savepv +#define savepvn Perl_savepvn #define savestack_grow Perl_savestack_grow #define sawparens Perl_sawparens #define scalar Perl_scalar @@ -909,7 +1008,10 @@ #define scan_word Perl_scan_word #define scope Perl_scope #define screaminstr Perl_screaminstr +#define setdefout Perl_setdefout #define setenv_getix Perl_setenv_getix +#define sharepvn Perl_sharepvn +#define sighandler Perl_sighandler #define skipspace Perl_skipspace #define stack_grow Perl_stack_grow #define start_subparse Perl_start_subparse @@ -922,6 +1024,7 @@ #define sv_2mortal Perl_sv_2mortal #define sv_2nv Perl_sv_2nv #define sv_2pv Perl_sv_2pv +#define sv_add_arena Perl_sv_add_arena #define sv_backoff Perl_sv_backoff #define sv_bless Perl_sv_bless #define sv_catpv Perl_sv_catpv @@ -936,6 +1039,7 @@ #define sv_dump Perl_sv_dump #define sv_eq Perl_sv_eq #define sv_free Perl_sv_free +#define sv_free_arenas Perl_sv_free_arenas #define sv_gets Perl_sv_gets #define sv_grow Perl_sv_grow #define sv_inc Perl_sv_inc @@ -946,8 +1050,11 @@ #define sv_magic Perl_sv_magic #define sv_mortalcopy Perl_sv_mortalcopy #define sv_newmortal Perl_sv_newmortal +#define sv_newref Perl_sv_newref #define sv_peek Perl_sv_peek +#define sv_pvn_force Perl_sv_pvn_force #define sv_ref Perl_sv_ref +#define sv_reftype Perl_sv_reftype #define sv_replace Perl_sv_replace #define sv_report_used Perl_sv_report_used #define sv_reset Perl_sv_reset @@ -957,9 +1064,12 @@ #define sv_setpv Perl_sv_setpv #define sv_setpvn Perl_sv_setpvn #define sv_setref_iv Perl_sv_setref_iv +#define sv_setref_nv Perl_sv_setref_nv #define sv_setref_pv Perl_sv_setref_pv +#define sv_setref_pvn Perl_sv_setref_pvn #define sv_setsv Perl_sv_setsv #define sv_unmagic Perl_sv_unmagic +#define sv_unref Perl_sv_unref #define sv_upgrade Perl_sv_upgrade #define sv_usepvn Perl_sv_usepvn #define taint_env Perl_taint_env @@ -967,6 +1077,9 @@ #define taint_proper Perl_taint_proper #define too_few_arguments Perl_too_few_arguments #define too_many_arguments Perl_too_many_arguments +#define unlnk Perl_unlnk +#define unsharepvn Perl_unsharepvn +#define utilize Perl_utilize #define wait4pid Perl_wait4pid #define warn Perl_warn #define watch Perl_watch @@ -977,7 +1090,6 @@ #define xpv_root Perl_xpv_root #define xrv_root Perl_xrv_root #define yyerror Perl_yyerror -#define yyerror Perl_yyerror #define yylex Perl_yylex #define yyparse Perl_yyparse #define yywarn Perl_yywarn @@ -988,6 +1100,14 @@ #ifdef MULTIPLICITY +/* Undefine symbols that were defined by EMBED. Somewhat ugly */ + +#undef curcop +#undef curcopdb +#undef envgv +#undef siggv +#undef tainting + #define Argv (curinterp->IArgv) #define Cmd (curinterp->ICmd) #define DBgv (curinterp->IDBgv) @@ -1008,8 +1128,10 @@ #define copline (curinterp->Icopline) #define curblock (curinterp->Icurblock) #define curcop (curinterp->Icurcop) +#define curcopdb (curinterp->Icurcopdb) #define curcsv (curinterp->Icurcsv) #define curpm (curinterp->Icurpm) +#define curstack (curinterp->Icurstack) #define curstash (curinterp->Icurstash) #define curstname (curinterp->Icurstname) #define cxstack (curinterp->Icxstack) @@ -1019,7 +1141,6 @@ #define debdelim (curinterp->Idebdelim) #define debname (curinterp->Idebname) #define debstash (curinterp->Idebstash) -#define debug (curinterp->Idebug) #define defgv (curinterp->Idefgv) #define defoutgv (curinterp->Idefoutgv) #define defstash (curinterp->Idefstash) @@ -1028,7 +1149,6 @@ #define dirty (curinterp->Idirty) #define dlevel (curinterp->Idlevel) #define dlmax (curinterp->Idlmax) -#define do_undump (curinterp->Ido_undump) #define doextract (curinterp->Idoextract) #define doswitches (curinterp->Idoswitches) #define dowarn (curinterp->Idowarn) @@ -1037,6 +1157,7 @@ #define e_tmpname (curinterp->Ie_tmpname) #define endav (curinterp->Iendav) #define envgv (curinterp->Ienvgv) +#define errgv (curinterp->Ierrgv) #define eval_root (curinterp->Ieval_root) #define eval_start (curinterp->Ieval_start) #define fdpid (curinterp->Ifdpid) @@ -1060,6 +1181,7 @@ #define leftgv (curinterp->Ileftgv) #define lineary (curinterp->Ilineary) #define localizing (curinterp->Ilocalizing) +#define localpatches (curinterp->Ilocalpatches) #define main_cv (curinterp->Imain_cv) #define main_root (curinterp->Imain_root) #define main_start (curinterp->Imain_start) @@ -1079,33 +1201,28 @@ #define mystack_sp (curinterp->Imystack_sp) #define mystrk (curinterp->Imystrk) #define nrs (curinterp->Inrs) -#define nrschar (curinterp->Inrschar) -#define nrslen (curinterp->Inrslen) #define ofmt (curinterp->Iofmt) #define ofs (curinterp->Iofs) #define ofslen (curinterp->Iofslen) #define oldlastpm (curinterp->Ioldlastpm) #define oldname (curinterp->Ioldname) +#define op_mask (curinterp->Iop_mask) #define origargc (curinterp->Iorigargc) #define origargv (curinterp->Iorigargv) #define origfilename (curinterp->Iorigfilename) #define ors (curinterp->Iors) #define orslen (curinterp->Iorslen) -#define pad (curinterp->Ipad) -#define padname (curinterp->Ipadname) #define parsehook (curinterp->Iparsehook) #define patchlevel (curinterp->Ipatchlevel) #define perldb (curinterp->Iperldb) #define perl_destruct_level (curinterp->Iperl_destruct_level) #define pidstatus (curinterp->Ipidstatus) #define preambled (curinterp->Ipreambled) +#define preambleav (curinterp->Ipreambleav) #define preprocess (curinterp->Ipreprocess) #define restartop (curinterp->Irestartop) #define rightgv (curinterp->Irightgv) #define rs (curinterp->Irs) -#define rschar (curinterp->Irschar) -#define rslen (curinterp->Irslen) -#define rspara (curinterp->Irspara) #define runlevel (curinterp->Irunlevel) #define sawampersand (curinterp->Isawampersand) #define sawi (curinterp->Isawi) @@ -1120,13 +1237,13 @@ #define sortstack (curinterp->Isortstack) #define sortstash (curinterp->Isortstash) #define splitstr (curinterp->Isplitstr) -#define stack (curinterp->Istack) #define statcache (curinterp->Istatcache) #define statgv (curinterp->Istatgv) #define statname (curinterp->Istatname) #define statusvalue (curinterp->Istatusvalue) #define stdingv (curinterp->Istdingv) #define strchop (curinterp->Istrchop) +#define strtab (curinterp->Istrtab) #define sv_count (curinterp->Isv_count) #define sv_objcount (curinterp->Isv_objcount) #define sv_root (curinterp->Isv_root) @@ -1164,8 +1281,10 @@ #define Icopline copline #define Icurblock curblock #define Icurcop curcop +#define Icurcopdb curcopdb #define Icurcsv curcsv #define Icurpm curpm +#define Icurstack curstack #define Icurstash curstash #define Icurstname curstname #define Icxstack cxstack @@ -1175,7 +1294,6 @@ #define Idebdelim debdelim #define Idebname debname #define Idebstash debstash -#define Idebug debug #define Idefgv defgv #define Idefoutgv defoutgv #define Idefstash defstash @@ -1184,7 +1302,6 @@ #define Idirty dirty #define Idlevel dlevel #define Idlmax dlmax -#define Ido_undump do_undump #define Idoextract doextract #define Idoswitches doswitches #define Idowarn dowarn @@ -1193,6 +1310,7 @@ #define Ie_tmpname e_tmpname #define Iendav endav #define Ienvgv envgv +#define Ierrgv errgv #define Ieval_root eval_root #define Ieval_start eval_start #define Ifdpid fdpid @@ -1216,6 +1334,7 @@ #define Ileftgv leftgv #define Ilineary lineary #define Ilocalizing localizing +#define Ilocalpatches localpatches #define Imain_cv main_cv #define Imain_root main_root #define Imain_start main_start @@ -1235,33 +1354,28 @@ #define Imystack_sp mystack_sp #define Imystrk mystrk #define Inrs nrs -#define Inrschar nrschar -#define Inrslen nrslen #define Iofmt ofmt #define Iofs ofs #define Iofslen ofslen #define Ioldlastpm oldlastpm #define Ioldname oldname +#define Iop_mask op_mask #define Iorigargc origargc #define Iorigargv origargv #define Iorigfilename origfilename #define Iors ors #define Iorslen orslen -#define Ipad pad -#define Ipadname padname #define Iparsehook parsehook #define Ipatchlevel patchlevel #define Iperldb perldb #define Iperl_destruct_level perl_destruct_level #define Ipidstatus pidstatus #define Ipreambled preambled +#define Ipreambleav preambleav #define Ipreprocess preprocess #define Irestartop restartop #define Irightgv rightgv #define Irs rs -#define Irschar rschar -#define Irslen rslen -#define Irspara rspara #define Irunlevel runlevel #define Isawampersand sawampersand #define Isawi sawi @@ -1276,13 +1390,13 @@ #define Isortstack sortstack #define Isortstash sortstash #define Isplitstr splitstr -#define Istack stack #define Istatcache statcache #define Istatgv statgv #define Istatname statname #define Istatusvalue statusvalue #define Istdingv stdingv #define Istrchop strchop +#define Istrtab strtab #define Isv_count sv_count #define Isv_objcount sv_objcount #define Isv_root sv_root