-/* 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
#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
#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 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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#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
#define sv_insert Perl_sv_insert
#define sv_isa Perl_sv_isa
+#define sv_isobject Perl_sv_isobject
#define sv_len Perl_sv_len
#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
#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
#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
#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
#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)
#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)
#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)
#define delaymagic (curinterp->Idelaymagic)
+#define diehook (curinterp->Idiehook)
#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)
#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)
#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)
#define mainstack (curinterp->Imainstack)
#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)
#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)
#define top_env (curinterp->Itop_env)
#define toptarget (curinterp->Itoptarget)
#define unsafe (curinterp->Iunsafe)
+#define warnhook (curinterp->Iwarnhook)
#else /* not multiple, so translate interpreter symbols the other way... */
#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
#define Idebdelim debdelim
#define Idebname debname
#define Idebstash debstash
-#define Idebug debug
#define Idefgv defgv
#define Idefoutgv defoutgv
#define Idefstash defstash
#define Idelaymagic delaymagic
+#define Idiehook diehook
#define Idirty dirty
#define Idlevel dlevel
#define Idlmax dlmax
-#define Ido_undump do_undump
#define Idoextract doextract
#define Idoswitches doswitches
#define Idowarn dowarn
#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
#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
#define Imainstack mainstack
#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
#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
#define Itop_env top_env
#define Itoptarget toptarget
#define Iunsafe unsafe
+#define Iwarnhook warnhook
#endif /* MULTIPLICITY */
https://perl5.git.perl.org / perl5.git / blobdiff