perl 5.003_01: perly.c vms/perly_c.vms

[p5sagit/p5-mst-13.2.git] / embed.h

/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
   This file is derived 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 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 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 cshlen		Perl_cshlen
#define cshname		Perl_cshname
#define curcop		Perl_curcop
#define curcopdb	Perl_curcopdb
#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 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 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_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 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_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_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 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_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 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_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 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 sharepvn	Perl_sharepvn
#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 unsharepvn	Perl_unsharepvn
#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

/* Undefine symbols that were defined by EMBED. Somewhat ugly */

#undef curcop
#undef envgv
#undef siggv
#undef stack
#undef tainting

#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 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 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 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 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 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 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 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 Icurcopdb	curcopdb
#define Icurcsv		curcsv
#define Icurpm		curpm
#define Icurstack	curstack
#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 Ilocalpatches	localpatches
#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 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 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 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 */