Convert to use $^O and Config's $dl_so instead of hard-wired .o

[perl5.git] / embed.h

/* This file is derived from global.sym and interp.sym */

/* (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 Xpv             Perl_Xpv
#define Yes             Perl_Yes
#define abs_amg         Perl_abs_amg
#define add_amg         Perl_add_amg
#define add_ass_amg     Perl_add_ass_amg
#define additem         Perl_additem
#define amagic_generation       Perl_amagic_generation
#define an              Perl_an
#define atan2_amg       Perl_atan2_amg
#define band_amg        Perl_band_amg
#define bool__amg       Perl_bool__amg
#define bor_amg         Perl_bor_amg
#define buf             Perl_buf
#define bufend          Perl_bufend
#define bufptr          Perl_bufptr
#define bxor_amg        Perl_bxor_amg
#define check           Perl_check
#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 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 cshlen          Perl_cshlen
#define cshname         Perl_cshname
#define curcop          Perl_curcop
#define curinterp       Perl_curinterp
#define curpad          Perl_curpad
#define dc              Perl_dc
#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 ds              Perl_ds
#define egid            Perl_egid
#define envgv           Perl_envgv
#define eq_amg          Perl_eq_amg
#define error_count     Perl_error_count
#define euid            Perl_euid
#define evalseq         Perl_evalseq
#define exp_amg         Perl_exp_amg
#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 gid             Perl_gid
#define gt_amg          Perl_gt_amg
#define hexdigit        Perl_hexdigit
#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 last_uni        Perl_last_uni
#define le_amg          Perl_le_amg
#define lex_state       Perl_lex_state
#define lex_defer       Perl_lex_defer
#define lex_expect      Perl_lex_expect
#define lex_brackets    Perl_lex_brackets
#define lex_formbrack   Perl_lex_formbrack
#define lex_fakebrack   Perl_lex_fakebrack
#define lex_casemods    Perl_lex_casemods
#define lex_dojoin      Perl_lex_dojoin
#define lex_starts      Perl_lex_starts
#define lex_stuff       Perl_lex_stuff
#define lex_repl        Perl_lex_repl
#define lex_op          Perl_lex_op
#define lex_inpat       Perl_lex_inpat
#define lex_inwhat      Perl_lex_inwhat
#define lex_brackstack  Perl_lex_brackstack
#define lex_casestack   Perl_lex_casestack
#define linestr         Perl_linestr
#define log_amg         Perl_log_amg
#define lshift_amg      Perl_lshift_amg
#define lshift_ass_amg  Perl_lshift_ass_amg
#define lt_amg          Perl_lt_amg
#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 mod_ass_amg     Perl_mod_ass_amg
#define mult_amg        Perl_mult_amg
#define mult_ass_amg    Perl_mult_ass_amg
#define multi_close     Perl_multi_close
#define multi_end       Perl_multi_end
#define multi_open      Perl_multi_open
#define multi_start     Perl_multi_start
#define na              Perl_na
#define ncmp_amg        Perl_ncmp_amg
#define nextval         Perl_nextval
#define nexttype        Perl_nexttype
#define nexttoke        Perl_nexttoke
#define ne_amg          Perl_ne_amg
#define neg_amg         Perl_neg_amg
#define nexttype        Perl_nexttype
#define nextval         Perl_nextval
#define no_aelem        Perl_no_aelem
#define no_dir_func     Perl_no_dir_func
#define no_func         Perl_no_func
#define no_helem        Perl_no_helem
#define no_mem          Perl_no_mem
#define no_modify       Perl_no_modify
#define no_security     Perl_no_security
#define no_sock_func    Perl_no_sock_func
#define no_usym         Perl_no_usym
#define nointrp         Perl_nointrp
#define nomem           Perl_nomem
#define nomemok         Perl_nomemok
#define nomethod_amg    Perl_nomethod_amg
#define not_amg         Perl_not_amg
#define numer_amg       Perl_numer_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 qrt_amg         Perl_qrt_amg
#define rcsid           Perl_rcsid
#define reall_srchlen   Perl_reall_srchlen
#define regarglen       Perl_regarglen
#define regbol          Perl_regbol
#define regcode         Perl_regcode
#define regdummy        Perl_regdummy
#define regendp         Perl_regendp
#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 regmystartp     Perl_regmystartp
#define regnarrate      Perl_regnarrate
#define regnaughty      Perl_regnaughty
#define regnpar         Perl_regnpar
#define regparse        Perl_regparse
#define regprecomp      Perl_regprecomp
#define regprev         Perl_regprev
#define regsawback      Perl_regsawback
#define regsize         Perl_regsize
#define regstartp       Perl_regstartp
#define regtill         Perl_regtill
#define regxend         Perl_regxend
#define repeat_amg      Perl_repeat_amg
#define repeat_ass_amg  Perl_repeat_ass_amg
#define retstack        Perl_retstack
#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 saw_return      Perl_saw_return
#define scmp_amg        Perl_scmp_amg
#define scopestack      Perl_scopestack
#define scopestack_ix   Perl_scopestack_ix
#define scopestack_max  Perl_scopestack_max
#define scrgv           Perl_scrgv
#define seq_amg         Perl_seq_amg
#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 sin_amg         Perl_sin_amg
#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 statbuf         Perl_statbuf
#define string_amg      Perl_string_amg
#define sub_generation  Perl_sub_generation
#define subline         Perl_subline
#define subname         Perl_subname
#define subtr_amg       Perl_subtr_amg
#define subtr_ass_amg   Perl_subtr_ass_amg
#define sv_no           Perl_sv_no
#define sv_undef        Perl_sv_undef
#define sv_yes          Perl_sv_yes
#define tainting        Perl_tainting
#define thisexpr        Perl_thisexpr
#define timesbuf        Perl_timesbuf
#define tokenbuf        Perl_tokenbuf
#define uid             Perl_uid
#define varies          Perl_varies
#define vert            Perl_vert
#define vtbl_amagic     Perl_vtbl_amagic
#define vtbl_amagicelem Perl_vtbl_amagicelem
#define vtbl_arylen     Perl_vtbl_arylen
#define vtbl_bm         Perl_vtbl_bm
#define vtbl_dbline     Perl_vtbl_dbline
#define vtbl_env        Perl_vtbl_env
#define vtbl_envelem    Perl_vtbl_envelem
#define vtbl_glob       Perl_vtbl_glob
#define vtbl_isa        Perl_vtbl_isa
#define vtbl_isaelem    Perl_vtbl_isaelem
#define vtbl_mglob      Perl_vtbl_mglob
#define vtbl_pack       Perl_vtbl_pack
#define vtbl_packelem   Perl_vtbl_packelem
#define vtbl_pos        Perl_vtbl_pos
#define vtbl_sig        Perl_vtbl_sig
#define vtbl_sigelem    Perl_vtbl_sigelem
#define vtbl_substr     Perl_vtbl_substr
#define vtbl_sv         Perl_vtbl_sv
#define vtbl_taint      Perl_vtbl_taint
#define vtbl_uvar       Perl_vtbl_uvar
#define vtbl_vec        Perl_vtbl_vec
#define warn_nl         Perl_warn_nl
#define warn_nosemi     Perl_warn_nosemi
#define warn_reserved   Perl_warn_reserved
#define watchaddr       Perl_watchaddr
#define watchok         Perl_watchok
#define yychar          Perl_yychar
#define yycheck         Perl_yycheck
#define yydebug         Perl_yydebug
#define yydefred        Perl_yydefred
#define yydgoto         Perl_yydgoto
#define yyerrflag       Perl_yyerrflag
#define yygindex        Perl_yygindex
#define yylen           Perl_yylen
#define yylhs           Perl_yylhs
#define yylval          Perl_yylval
#define yyname          Perl_yyname
#define yynerrs         Perl_yynerrs
#define yyrindex        Perl_yyrindex
#define yyrule          Perl_yyrule
#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 av_len          Perl_av_len
#define av_make         Perl_av_make
#define av_pop          Perl_av_pop
#define av_push         Perl_av_push
#define av_shift        Perl_av_shift
#define av_store        Perl_av_store
#define av_undef        Perl_av_undef
#define av_unshift      Perl_av_unshift
#define bind_match      Perl_bind_match
#define block_end       Perl_block_end
#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 chsize          Perl_chsize
#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_formline     Perl_ck_formline
#define ck_ftst         Perl_ck_ftst
#define ck_fun          Perl_ck_fun
#define ck_glob         Perl_ck_glob
#define ck_grep         Perl_ck_grep
#define ck_gvconst      Perl_ck_gvconst
#define ck_index        Perl_ck_index
#define ck_lengthconst  Perl_ck_lengthconst
#define ck_lfun         Perl_ck_lfun
#define ck_listiob      Perl_ck_listiob
#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_sort         Perl_ck_sort
#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_exec         Perl_do_exec
#define do_execfree     Perl_do_execfree
#define do_ipcctl       Perl_do_ipcctl
#define do_ipcget       Perl_do_ipcget
#define do_join         Perl_do_join
#define do_kv           Perl_do_kv
#define do_msgrcv       Perl_do_msgrcv
#define do_msgsnd       Perl_do_msgsnd
#define do_open         Perl_do_open
#define do_pipe         Perl_do_pipe
#define do_print        Perl_do_print
#define do_readline     Perl_do_readline
#define do_seek         Perl_do_seek
#define do_semop        Perl_do_semop
#define do_shmio        Perl_do_shmio
#define do_sprintf      Perl_do_sprintf
#define do_tell         Perl_do_tell
#define do_trans        Perl_do_trans
#define do_vecset       Perl_do_vecset
#define do_vop          Perl_do_vop
#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 dump_sub        Perl_dump_sub
#define fbm_compile     Perl_fbm_compile
#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 gen_constant_list       Perl_gen_constant_list
#define gp_free         Perl_gp_free
#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_fetchmeth    Perl_gv_fetchmeth
#define gv_fetchmethod  Perl_gv_fetchmethod
#define gv_fetchpv      Perl_gv_fetchpv
#define gv_fullname     Perl_gv_fullname
#define gv_init         Perl_gv_init
#define gv_stashpv      Perl_gv_stashpv
#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_exists       Perl_hv_exists
#define hv_fetch        Perl_hv_fetch
#define hv_iterinit     Perl_hv_iterinit
#define hv_iterkey      Perl_hv_iterkey
#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_undef        Perl_hv_undef
#define ibcmp           Perl_ibcmp
#define ingroup         Perl_ingroup
#define instr           Perl_instr
#define intuit_more     Perl_intuit_more
#define invert          Perl_invert
#define jmaybe          Perl_jmaybe
#define keyword         Perl_keyword
#define leave_scope     Perl_leave_scope
#define lex_end         Perl_lex_end
#define lex_start       Perl_lex_start
#define linklist        Perl_linklist
#define list            Perl_list
#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_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_gettaint  Perl_magic_gettaint
#define magic_getuvar   Perl_magic_getuvar
#define magic_len       Perl_magic_len
#define magic_nextpack  Perl_magic_nextpack
#define magic_set       Perl_magic_set
#define magic_setamagic Perl_magic_setamagic
#define magic_setarylen Perl_magic_setarylen
#define magic_setbm     Perl_magic_setbm
#define magic_setdbline Perl_magic_setdbline
#define magic_setenv    Perl_magic_setenv
#define magic_setglob   Perl_magic_setglob
#define magic_setisa    Perl_magic_setisa
#define magic_setmglob  Perl_magic_setmglob
#define magic_setpack   Perl_magic_setpack
#define magic_setpos    Perl_magic_setpos
#define magic_setsig    Perl_magic_setsig
#define magic_setsubstr Perl_magic_setsubstr
#define magic_settaint  Perl_magic_settaint
#define magic_setuvar   Perl_magic_setuvar
#define magic_setvec    Perl_magic_setvec
#define magic_wipepack  Perl_magic_wipepack
#define magicname       Perl_magicname
#define markstack_grow  Perl_markstack_grow
#define mess            Perl_mess
#define mg_clear        Perl_mg_clear
#define mg_copy         Perl_mg_copy
#define mg_find         Perl_mg_find
#define mg_free         Perl_mg_free
#define mg_get          Perl_mg_get
#define mg_len          Perl_mg_len
#define mg_magical      Perl_mg_magical
#define mg_set          Perl_mg_set
#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_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 newCVREF        Perl_newCVREF
#define newFORM         Perl_newFORM
#define newFOROP        Perl_newFOROP
#define newGVOP         Perl_newGVOP
#define newGVREF        Perl_newGVREF
#define newGVgen        Perl_newGVgen
#define newHV           Perl_newHV
#define newHVREF        Perl_newHVREF
#define newIO           Perl_newIO
#define newLISTOP       Perl_newLISTOP
#define newLOGOP        Perl_newLOGOP
#define newLOOPEX       Perl_newLOOPEX
#define newLOOPOP       Perl_newLOOPOP
#define newNULLLIST     Perl_newNULLLIST
#define newOP           Perl_newOP
#define newPMOP         Perl_newPMOP
#define newPROG         Perl_newPROG
#define newPVOP         Perl_newPVOP
#define newRANGE        Perl_newRANGE
#define newRV           Perl_newRV
#define newSLICEOP      Perl_newSLICEOP
#define newSTATEOP      Perl_newSTATEOP
#define newSUB          Perl_newSUB
#define newSV           Perl_newSV
#define newSVOP         Perl_newSVOP
#define newSVREF        Perl_newSVREF
#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 newXS           Perl_newXS
#define newXSUB         Perl_newXSUB
#define nextargv        Perl_nextargv
#define ninstr          Perl_ninstr
#define no_fh_allowed   Perl_no_fh_allowed
#define no_op           Perl_no_op
#define oopsAV          Perl_oopsAV
#define oopsCV          Perl_oopsCV
#define oopsHV          Perl_oopsHV
#define op_free         Perl_op_free
#define package         Perl_package
#define pad_alloc       Perl_pad_alloc
#define pad_allocmy     Perl_pad_allocmy
#define pad_findmy      Perl_pad_findmy
#define pad_free        Perl_pad_free
#define pad_leavemy     Perl_pad_leavemy
#define pad_reset       Perl_pad_reset
#define pad_sv          Perl_pad_sv
#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_aelemfast    Perl_pp_aelemfast
#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_atan2        Perl_pp_atan2
#define pp_av2arylen    Perl_pp_av2arylen
#define pp_backtick     Perl_pp_backtick
#define pp_bind         Perl_pp_bind
#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_complement   Perl_pp_complement
#define pp_concat       Perl_pp_concat
#define pp_cond_expr    Perl_pp_cond_expr
#define pp_connect      Perl_pp_connect
#define pp_const        Perl_pp_const
#define pp_cos          Perl_pp_cos
#define pp_crypt        Perl_pp_crypt
#define pp_cswitch      Perl_pp_cswitch
#define pp_dbmclose     Perl_pp_dbmclose
#define pp_dbmopen      Perl_pp_dbmopen
#define pp_dbstate      Perl_pp_dbstate
#define pp_defined      Perl_pp_defined
#define pp_delete       Perl_pp_delete
#define pp_die          Perl_pp_die
#define pp_divide       Perl_pp_divide
#define pp_dofile       Perl_pp_dofile
#define pp_dump         Perl_pp_dump
#define pp_each         Perl_pp_each
#define pp_egrent       Perl_pp_egrent
#define pp_ehostent     Perl_pp_ehostent
#define pp_enetent      Perl_pp_enetent
#define pp_enter        Perl_pp_enter
#define pp_entereval    Perl_pp_entereval
#define pp_enteriter    Perl_pp_enteriter
#define pp_enterloop    Perl_pp_enterloop
#define pp_entersub     Perl_pp_entersub
#define pp_entersubr    Perl_pp_entersubr
#define pp_entertry     Perl_pp_entertry
#define pp_enterwrite   Perl_pp_enterwrite
#define pp_eof          Perl_pp_eof
#define pp_eprotoent    Perl_pp_eprotoent
#define pp_epwent       Perl_pp_epwent
#define pp_eq           Perl_pp_eq
#define pp_eservent     Perl_pp_eservent
#define pp_evalonce     Perl_pp_evalonce
#define pp_exec         Perl_pp_exec
#define pp_exists       Perl_pp_exists
#define pp_exit         Perl_pp_exit
#define pp_exp          Perl_pp_exp
#define pp_fcntl        Perl_pp_fcntl
#define pp_fileno       Perl_pp_fileno
#define pp_flip         Perl_pp_flip
#define pp_flock        Perl_pp_flock
#define pp_flop         Perl_pp_flop
#define pp_fork         Perl_pp_fork
#define pp_formline     Perl_pp_formline
#define pp_ftatime      Perl_pp_ftatime
#define pp_ftbinary     Perl_pp_ftbinary
#define pp_ftblk        Perl_pp_ftblk
#define pp_ftchr        Perl_pp_ftchr
#define pp_ftctime      Perl_pp_ftctime
#define pp_ftdir        Perl_pp_ftdir
#define pp_fteexec      Perl_pp_fteexec
#define pp_fteowned     Perl_pp_fteowned
#define pp_fteread      Perl_pp_fteread
#define pp_ftewrite     Perl_pp_ftewrite
#define pp_ftfile       Perl_pp_ftfile
#define pp_ftis         Perl_pp_ftis
#define pp_ftlink       Perl_pp_ftlink
#define pp_ftmtime      Perl_pp_ftmtime
#define pp_ftpipe       Perl_pp_ftpipe
#define pp_ftrexec      Perl_pp_ftrexec
#define pp_ftrowned     Perl_pp_ftrowned
#define pp_ftrread      Perl_pp_ftrread
#define pp_ftrwrite     Perl_pp_ftrwrite
#define pp_ftsgid       Perl_pp_ftsgid
#define pp_ftsize       Perl_pp_ftsize
#define pp_ftsock       Perl_pp_ftsock
#define pp_ftsuid       Perl_pp_ftsuid
#define pp_ftsvtx       Perl_pp_ftsvtx
#define pp_fttext       Perl_pp_fttext
#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_getpgrp      Perl_pp_getpgrp
#define pp_getppid      Perl_pp_getppid
#define pp_getpriority  Perl_pp_getpriority
#define pp_getsockname  Perl_pp_getsockname
#define pp_ggrent       Perl_pp_ggrent
#define pp_ggrgid       Perl_pp_ggrgid
#define pp_ggrnam       Perl_pp_ggrnam
#define pp_ghbyaddr     Perl_pp_ghbyaddr
#define pp_ghbyname     Perl_pp_ghbyname
#define pp_ghostent     Perl_pp_ghostent
#define pp_glob         Perl_pp_glob
#define pp_gmtime       Perl_pp_gmtime
#define pp_gnbyaddr     Perl_pp_gnbyaddr
#define pp_gnbyname     Perl_pp_gnbyname
#define pp_gnetent      Perl_pp_gnetent
#define pp_goto         Perl_pp_goto
#define pp_gpbyname     Perl_pp_gpbyname
#define pp_gpbynumber   Perl_pp_gpbynumber
#define pp_gprotoent    Perl_pp_gprotoent
#define pp_gpwent       Perl_pp_gpwent
#define pp_gpwnam       Perl_pp_gpwnam
#define pp_gpwuid       Perl_pp_gpwuid
#define pp_grepstart    Perl_pp_grepstart
#define pp_grepwhile    Perl_pp_grepwhile
#define pp_gsbyname     Perl_pp_gsbyname
#define pp_gsbyport     Perl_pp_gsbyport
#define pp_gservent     Perl_pp_gservent
#define pp_gsockopt     Perl_pp_gsockopt
#define pp_gt           Perl_pp_gt
#define pp_gv           Perl_pp_gv
#define pp_gvsv         Perl_pp_gvsv
#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_interp       Perl_pp_interp
#define pp_ioctl        Perl_pp_ioctl
#define pp_iter         Perl_pp_iter
#define pp_join         Perl_pp_join
#define pp_keys         Perl_pp_keys
#define pp_kill         Perl_pp_kill
#define pp_last         Perl_pp_last
#define pp_lc           Perl_pp_lc
#define pp_lcfirst      Perl_pp_lcfirst
#define pp_le           Perl_pp_le
#define pp_leave        Perl_pp_leave
#define pp_leaveeval    Perl_pp_leaveeval
#define pp_leaveloop    Perl_pp_leaveloop
#define pp_leavesub     Perl_pp_leavesub
#define pp_leavetry     Perl_pp_leavetry
#define pp_leavewrite   Perl_pp_leavewrite
#define pp_left_shift   Perl_pp_left_shift
#define pp_length       Perl_pp_length
#define pp_lineseq      Perl_pp_lineseq
#define pp_link         Perl_pp_link
#define pp_list         Perl_pp_list
#define pp_listen       Perl_pp_listen
#define pp_localtime    Perl_pp_localtime
#define pp_log          Perl_pp_log
#define pp_lslice       Perl_pp_lslice
#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_modulo       Perl_pp_modulo
#define pp_msgctl       Perl_pp_msgctl
#define pp_msgget       Perl_pp_msgget
#define pp_msgrcv       Perl_pp_msgrcv
#define pp_msgsnd       Perl_pp_msgsnd
#define pp_multiply     Perl_pp_multiply
#define pp_ncmp         Perl_pp_ncmp
#define pp_ne           Perl_pp_ne
#define pp_negate       Perl_pp_negate
#define pp_next         Perl_pp_next
#define pp_nextstate    Perl_pp_nextstate
#define pp_not          Perl_pp_not
#define pp_nswitch      Perl_pp_nswitch
#define pp_null         Perl_pp_null
#define pp_oct          Perl_pp_oct
#define pp_open         Perl_pp_open
#define pp_open_dir     Perl_pp_open_dir
#define pp_or           Perl_pp_or
#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_pipe_op      Perl_pp_pipe_op
#define pp_pop          Perl_pp_pop
#define pp_pos          Perl_pp_pos
#define pp_postdec      Perl_pp_postdec
#define pp_postinc      Perl_pp_postinc
#define pp_pow          Perl_pp_pow
#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_read         Perl_pp_read
#define pp_readdir      Perl_pp_readdir
#define pp_readline     Perl_pp_readline
#define pp_readlink     Perl_pp_readlink
#define pp_recv         Perl_pp_recv
#define pp_redo         Perl_pp_redo
#define pp_ref          Perl_pp_ref
#define pp_refgen       Perl_pp_refgen
#define pp_regcmaybe    Perl_pp_regcmaybe
#define pp_regcomp      Perl_pp_regcomp
#define pp_rename       Perl_pp_rename
#define pp_repeat       Perl_pp_repeat
#define pp_require      Perl_pp_require
#define pp_reset        Perl_pp_reset
#define pp_return       Perl_pp_return
#define pp_reverse      Perl_pp_reverse
#define pp_rewinddir    Perl_pp_rewinddir
#define pp_right_shift  Perl_pp_right_shift
#define pp_rindex       Perl_pp_rindex
#define pp_rmdir        Perl_pp_rmdir
#define pp_rv2av        Perl_pp_rv2av
#define pp_rv2cv        Perl_pp_rv2cv
#define pp_rv2gv        Perl_pp_rv2gv
#define pp_rv2hv        Perl_pp_rv2hv
#define pp_rv2sv        Perl_pp_rv2sv
#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_seek         Perl_pp_seek
#define pp_seekdir      Perl_pp_seekdir
#define pp_select       Perl_pp_select
#define pp_semctl       Perl_pp_semctl
#define pp_semget       Perl_pp_semget
#define pp_semop        Perl_pp_semop
#define pp_send         Perl_pp_send
#define pp_seq          Perl_pp_seq
#define pp_setpgrp      Perl_pp_setpgrp
#define pp_setpriority  Perl_pp_setpriority
#define pp_sge          Perl_pp_sge
#define pp_sgrent       Perl_pp_sgrent
#define pp_sgt          Perl_pp_sgt
#define pp_shift        Perl_pp_shift
#define pp_shmctl       Perl_pp_shmctl
#define pp_shmget       Perl_pp_shmget
#define pp_shmread      Perl_pp_shmread
#define pp_shmwrite     Perl_pp_shmwrite
#define pp_shostent     Perl_pp_shostent
#define pp_shutdown     Perl_pp_shutdown
#define pp_sin          Perl_pp_sin
#define pp_sle          Perl_pp_sle
#define pp_sleep        Perl_pp_sleep
#define pp_slt          Perl_pp_slt
#define pp_sne          Perl_pp_sne
#define pp_snetent      Perl_pp_snetent
#define pp_socket       Perl_pp_socket
#define pp_sockpair     Perl_pp_sockpair
#define pp_sort         Perl_pp_sort
#define pp_splice       Perl_pp_splice
#define pp_split        Perl_pp_split
#define pp_sprintf      Perl_pp_sprintf
#define pp_sprotoent    Perl_pp_sprotoent
#define pp_spwent       Perl_pp_spwent
#define pp_sqrt         Perl_pp_sqrt
#define pp_srand        Perl_pp_srand
#define pp_srefgen      Perl_pp_srefgen
#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_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_truncate     Perl_pp_truncate
#define pp_uc           Perl_pp_uc
#define pp_ucfirst      Perl_pp_ucfirst
#define pp_umask        Perl_pp_umask
#define pp_undef        Perl_pp_undef
#define pp_unlink       Perl_pp_unlink
#define pp_unpack       Perl_pp_unpack
#define pp_unshift      Perl_pp_unshift
#define pp_unstack      Perl_pp_unstack
#define pp_untie        Perl_pp_untie
#define pp_utime        Perl_pp_utime
#define pp_values       Perl_pp_values
#define pp_vec          Perl_pp_vec
#define pp_wait         Perl_pp_wait
#define pp_waitpid      Perl_pp_waitpid
#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 regdump         Perl_regdump
#define regnext         Perl_regnext
#define regprop         Perl_regprop
#define repeatcpy       Perl_repeatcpy
#define rninstr         Perl_rninstr
#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_hash       Perl_save_hash
#define save_hptr       Perl_save_hptr
#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 scalarkids      Perl_scalarkids
#define scalarseq       Perl_scalarseq
#define scalarvoid      Perl_scalarvoid
#define scan_const      Perl_scan_const
#define scan_formline   Perl_scan_formline
#define scan_heredoc    Perl_scan_heredoc
#define scan_hex        Perl_scan_hex
#define scan_ident      Perl_scan_ident
#define scan_inputsymbol        Perl_scan_inputsymbol
#define scan_num        Perl_scan_num
#define scan_oct        Perl_scan_oct
#define scan_pat        Perl_scan_pat
#define scan_prefix     Perl_scan_prefix
#define scan_str        Perl_scan_str
#define scan_subst      Perl_scan_subst
#define scan_trans      Perl_scan_trans
#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 sighandler      Perl_sighandler
#define skipspace       Perl_skipspace
#define stack_grow      Perl_stack_grow
#define start_subparse  Perl_start_subparse
#define sublex_done     Perl_sublex_done
#define sublex_start    Perl_sublex_start
#define sv_2bool        Perl_sv_2bool
#define sv_2cv          Perl_sv_2cv
#define sv_2io          Perl_sv_2io
#define sv_2iv          Perl_sv_2iv
#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_catpvn       Perl_sv_catpvn
#define sv_catsv        Perl_sv_catsv
#define sv_chop         Perl_sv_chop
#define sv_clean_all    Perl_sv_clean_all
#define sv_clean_objs   Perl_sv_clean_objs
#define sv_clear        Perl_sv_clear
#define sv_cmp          Perl_sv_cmp
#define sv_dec          Perl_sv_dec
#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_setiv        Perl_sv_setiv
#define sv_setnv        Perl_sv_setnv
#define sv_setptrobj    Perl_sv_setptrobj
#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_not       Perl_taint_not
#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 utilize         Perl_utilize
#define wait4pid        Perl_wait4pid
#define warn            Perl_warn
#define watch           Perl_watch
#define whichsig        Perl_whichsig
#define xiv_arenaroot   Perl_xiv_arenaroot
#define xiv_root        Perl_xiv_root
#define xnv_root        Perl_xnv_root
#define xpv_root        Perl_xpv_root
#define xrv_root        Perl_xrv_root
#define yyerror         Perl_yyerror
#define yylex           Perl_yylex
#define yyparse         Perl_yyparse
#define yywarn          Perl_yywarn

#endif /* EMBED */

/* Put interpreter specific symbols into a struct? */

#ifdef MULTIPLICITY

#define Argv            (curinterp->IArgv)
#define Cmd             (curinterp->ICmd)
#define DBgv            (curinterp->IDBgv)
#define DBline          (curinterp->IDBline)
#define DBsignal        (curinterp->IDBsignal)
#define DBsingle        (curinterp->IDBsingle)
#define DBsub           (curinterp->IDBsub)
#define DBtrace         (curinterp->IDBtrace)
#define allgvs          (curinterp->Iallgvs)
#define ampergv         (curinterp->Iampergv)
#define argvgv          (curinterp->Iargvgv)
#define argvoutgv       (curinterp->Iargvoutgv)
#define basetime        (curinterp->Ibasetime)
#define beginav         (curinterp->Ibeginav)
#define bodytarget      (curinterp->Ibodytarget)
#define cddir           (curinterp->Icddir)
#define chopset         (curinterp->Ichopset)
#define copline         (curinterp->Icopline)
#define curblock        (curinterp->Icurblock)
#define curcop          (curinterp->Icurcop)
#define curcsv          (curinterp->Icurcsv)
#define curpm           (curinterp->Icurpm)
#define curstash        (curinterp->Icurstash)
#define curstname       (curinterp->Icurstname)
#define cxstack         (curinterp->Icxstack)
#define cxstack_ix      (curinterp->Icxstack_ix)
#define cxstack_max     (curinterp->Icxstack_max)
#define dbargs          (curinterp->Idbargs)
#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 dumplvl         (curinterp->Idumplvl)
#define e_fp            (curinterp->Ie_fp)
#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 filemode        (curinterp->Ifilemode)
#define firstgv         (curinterp->Ifirstgv)
#define forkprocess     (curinterp->Iforkprocess)
#define formfeed        (curinterp->Iformfeed)
#define formtarget      (curinterp->Iformtarget)
#define gensym          (curinterp->Igensym)
#define in_eval         (curinterp->Iin_eval)
#define incgv           (curinterp->Iincgv)
#define inplace         (curinterp->Iinplace)
#define last_in_gv      (curinterp->Ilast_in_gv)
#define lastfd          (curinterp->Ilastfd)
#define lastretstr      (curinterp->Ilastretstr)
#define lastscream      (curinterp->Ilastscream)
#define lastsize        (curinterp->Ilastsize)
#define lastspbase      (curinterp->Ilastspbase)
#define laststatval     (curinterp->Ilaststatval)
#define laststype       (curinterp->Ilaststype)
#define leftgv          (curinterp->Ileftgv)
#define lineary         (curinterp->Ilineary)
#define localizing      (curinterp->Ilocalizing)
#define main_cv         (curinterp->Imain_cv)
#define main_root       (curinterp->Imain_root)
#define main_start      (curinterp->Imain_start)
#define mainstack       (curinterp->Imainstack)
#define maxscream       (curinterp->Imaxscream)
#define maxsysfd        (curinterp->Imaxsysfd)
#define minus_F         (curinterp->Iminus_F)
#define minus_a         (curinterp->Iminus_a)
#define minus_c         (curinterp->Iminus_c)
#define minus_l         (curinterp->Iminus_l)
#define minus_n         (curinterp->Iminus_n)
#define minus_p         (curinterp->Iminus_p)
#define multiline       (curinterp->Imultiline)
#define mystack_base    (curinterp->Imystack_base)
#define mystack_mark    (curinterp->Imystack_mark)
#define mystack_max     (curinterp->Imystack_max)
#define mystack_sp      (curinterp->Imystack_sp)
#define mystrk          (curinterp->Imystrk)
#define nrs             (curinterp->Inrs)
#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 runlevel        (curinterp->Irunlevel)
#define sawampersand    (curinterp->Isawampersand)
#define sawi            (curinterp->Isawi)
#define sawstudy        (curinterp->Isawstudy)
#define sawvec          (curinterp->Isawvec)
#define screamfirst     (curinterp->Iscreamfirst)
#define screamnext      (curinterp->Iscreamnext)
#define secondgv        (curinterp->Isecondgv)
#define siggv           (curinterp->Isiggv)
#define signalstack     (curinterp->Isignalstack)
#define sortcop         (curinterp->Isortcop)
#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 sv_count        (curinterp->Isv_count)
#define sv_objcount     (curinterp->Isv_objcount)
#define sv_root         (curinterp->Isv_root)
#define sv_arenaroot    (curinterp->Isv_arenaroot)
#define tainted         (curinterp->Itainted)
#define tainting        (curinterp->Itainting)
#define tmps_floor      (curinterp->Itmps_floor)
#define tmps_ix         (curinterp->Itmps_ix)
#define tmps_max        (curinterp->Itmps_max)
#define tmps_stack      (curinterp->Itmps_stack)
#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 IArgv           Argv
#define ICmd            Cmd
#define IDBgv           DBgv
#define IDBline         DBline
#define IDBsignal       DBsignal
#define IDBsingle       DBsingle
#define IDBsub          DBsub
#define IDBtrace        DBtrace
#define Iallgvs         allgvs
#define Iampergv        ampergv
#define Iargvgv         argvgv
#define Iargvoutgv      argvoutgv
#define Ibasetime       basetime
#define Ibeginav        beginav
#define Ibodytarget     bodytarget
#define Icddir          cddir
#define Ichopset        chopset
#define Icopline        copline
#define Icurblock       curblock
#define Icurcop         curcop
#define Icurcsv         curcsv
#define Icurpm          curpm
#define Icurstash       curstash
#define Icurstname      curstname
#define Icxstack        cxstack
#define Icxstack_ix     cxstack_ix
#define Icxstack_max    cxstack_max
#define Idbargs         dbargs
#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 Idumplvl        dumplvl
#define Ie_fp           e_fp
#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 Ifilemode       filemode
#define Ifirstgv        firstgv
#define Iforkprocess    forkprocess
#define Iformfeed       formfeed
#define Iformtarget     formtarget
#define Igensym         gensym
#define Iin_eval        in_eval
#define Iincgv          incgv
#define Iinplace        inplace
#define Ilast_in_gv     last_in_gv
#define Ilastfd         lastfd
#define Ilastretstr     lastretstr
#define Ilastscream     lastscream
#define Ilastsize       lastsize
#define Ilastspbase     lastspbase
#define Ilaststatval    laststatval
#define Ilaststype      laststype
#define Ileftgv         leftgv
#define Ilineary        lineary
#define Ilocalizing     localizing
#define Imain_cv        main_cv
#define Imain_root      main_root
#define Imain_start     main_start
#define Imainstack      mainstack
#define Imaxscream      maxscream
#define Imaxsysfd       maxsysfd
#define Iminus_F        minus_F
#define Iminus_a        minus_a
#define Iminus_c        minus_c
#define Iminus_l        minus_l
#define Iminus_n        minus_n
#define Iminus_p        minus_p
#define Imultiline      multiline
#define Imystack_base   mystack_base
#define Imystack_mark   mystack_mark
#define Imystack_max    mystack_max
#define Imystack_sp     mystack_sp
#define Imystrk         mystrk
#define Inrs            nrs
#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 Irunlevel       runlevel
#define Isawampersand   sawampersand
#define Isawi           sawi
#define Isawstudy       sawstudy
#define Isawvec         sawvec
#define Iscreamfirst    screamfirst
#define Iscreamnext     screamnext
#define Isecondgv       secondgv
#define Isiggv          siggv
#define Isignalstack    signalstack
#define Isortcop        sortcop
#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 Isv_count       sv_count
#define Isv_objcount    sv_objcount
#define Isv_root        sv_root
#define Isv_arenaroot   sv_arenaroot
#define Itainted        tainted
#define Itainting       tainting
#define Itmps_floor     tmps_floor
#define Itmps_ix        tmps_ix
#define Itmps_max       tmps_max
#define Itmps_stack     tmps_stack
#define Itop_env        top_env
#define Itoptarget      toptarget
#define Iunsafe         unsafe
#define Iwarnhook       warnhook

#endif /* MULTIPLICITY */