perl 5.0 alpha 6

[editor's note: cleaned up from the September '94 InfoMagic CD, just
like the last commit]

1 files changed, 882 insertions, 853 deletions

diff --git a/embed.h b/embed.h
index 5a9b072cbe..50078b5b68 100644
--- a/embed.h
+++ b/embed.h
@@ -1,860 +1,883 @@
-/* This file is derived from global.var and interp.var */
+/* This file is derived from global.sym and interp.sym */
 
 /* (Doing namespace management portably in C is really gross.) */
 
 #ifdef EMBED
 
 /* globals we need to hide from the world */
-#define No		PERLNo
-#define Sv		PERLSv
-#define Xpv		PERLXpv
-#define Yes		PERLYes
-#define additem		PERLadditem
-#define an		PERLan
-#define buf		PERLbuf
-#define bufend		PERLbufend
-#define bufptr		PERLbufptr
-#define check		PERLcheck
-#define coeff		PERLcoeff
-#define compiling	PERLcompiling
-#define comppad		PERLcomppad
-#define comppadname	PERLcomppadname
-#define comppadnamefill	PERLcomppadnamefill
-#define cop_seqmax	PERLcop_seqmax
-#define cryptseen	PERLcryptseen
-#define cshlen		PERLcshlen
-#define cshname		PERLcshname
-#define curinterp	PERLcurinterp
-#define curpad		PERLcurpad
-#define dc		PERLdc
-#define di		PERLdi
-#define ds		PERLds
-#define egid		PERLegid
-#define error_count	PERLerror_count
-#define euid		PERLeuid
-#define evstr		PERLevstr
-#define expect		PERLexpect
-#define expectterm	PERLexpectterm
-#define fold		PERLfold
-#define freq		PERLfreq
-#define gid		PERLgid
-#define hexdigit	PERLhexdigit
-#define in_format	PERLin_format
-#define in_my		PERLin_my
-#define know_next	PERLknow_next
-#define last_lop	PERLlast_lop
-#define last_uni	PERLlast_uni
-#define linestr		PERLlinestr
-#define markstack	PERLmarkstack
-#define markstack_max	PERLmarkstack_max
-#define markstack_ptr	PERLmarkstack_ptr
-#define multi_close	PERLmulti_close
-#define multi_end	PERLmulti_end
-#define multi_open	PERLmulti_open
-#define multi_start	PERLmulti_start
-#define na		PERLna
-#define needblockscope	PERLneedblockscope
-#define nexttype	PERLnexttype
-#define nextval		PERLnextval
-#define no_aelem	PERLno_aelem
-#define no_dir_func	PERLno_dir_func
-#define no_func		PERLno_func
-#define no_helem	PERLno_helem
-#define no_mem		PERLno_mem
-#define no_modify	PERLno_modify
-#define no_security	PERLno_security
-#define no_sock_func	PERLno_sock_func
-#define no_usym		PERLno_usym
-#define nointrp		PERLnointrp
-#define nomem		PERLnomem
-#define nomemok		PERLnomemok
-#define oldbufptr	PERLoldbufptr
-#define oldoldbufptr	PERLoldoldbufptr
-#define op		PERLop
-#define op_name		PERLop_name
-#define op_seqmax	PERLop_seqmax
-#define opargs		PERLopargs
-#define origalen	PERLorigalen
-#define origenviron	PERLorigenviron
-#define padix		PERLpadix
-#define patleave	PERLpatleave
-#define ppaddr		PERLppaddr
-#define rcsid		PERLrcsid
-#define reall_srchlen	PERLreall_srchlen
-#define regarglen	PERLregarglen
-#define regbol		PERLregbol
-#define regcode		PERLregcode
-#define regdummy	PERLregdummy
-#define regendp		PERLregendp
-#define regeol		PERLregeol
-#define regfold		PERLregfold
-#define reginput	PERLreginput
-#define reglastparen	PERLreglastparen
-#define regmyendp	PERLregmyendp
-#define regmyp_size	PERLregmyp_size
-#define regmystartp	PERLregmystartp
-#define regnarrate	PERLregnarrate
-#define regnpar		PERLregnpar
-#define regparse	PERLregparse
-#define regprecomp	PERLregprecomp
-#define regprev		PERLregprev
-#define regsawback	PERLregsawback
-#define regsawbracket	PERLregsawbracket
-#define regsize		PERLregsize
-#define regstartp	PERLregstartp
-#define regtill		PERLregtill
-#define regxend		PERLregxend
-#define retstack	PERLretstack
-#define retstack_ix	PERLretstack_ix
-#define retstack_max	PERLretstack_max
-#define rsfp		PERLrsfp
-#define savestack	PERLsavestack
-#define savestack_ix	PERLsavestack_ix
-#define savestack_max	PERLsavestack_max
-#define saw_return	PERLsaw_return
-#define scopestack	PERLscopestack
-#define scopestack_ix	PERLscopestack_ix
-#define scopestack_max	PERLscopestack_max
-#define scrgv		PERLscrgv
-#define sig_name	PERLsig_name
-#define simple		PERLsimple
-#define stack_base	PERLstack_base
-#define stack_max	PERLstack_max
-#define stack_sp	PERLstack_sp
-#define statbuf		PERLstatbuf
-#define sub_generation	PERLsub_generation
-#define subline		PERLsubline
-#define subname		PERLsubname
-#define sv_no		PERLsv_no
-#define sv_undef	PERLsv_undef
-#define sv_yes		PERLsv_yes
-#define thisexpr	PERLthisexpr
-#define timesbuf	PERLtimesbuf
-#define tokenbuf	PERLtokenbuf
-#define uid		PERLuid
-#define varies		PERLvaries
-#define vert		PERLvert
-#define vtbl_arylen	PERLvtbl_arylen
-#define vtbl_bm		PERLvtbl_bm
-#define vtbl_dbline	PERLvtbl_dbline
-#define vtbl_env	PERLvtbl_env
-#define vtbl_envelem	PERLvtbl_envelem
-#define vtbl_glob	PERLvtbl_glob
-#define vtbl_isa	PERLvtbl_isa
-#define vtbl_isaelem	PERLvtbl_isaelem
-#define vtbl_mglob	PERLvtbl_mglob
-#define vtbl_pack	PERLvtbl_pack
-#define vtbl_packelem	PERLvtbl_packelem
-#define vtbl_sig	PERLvtbl_sig
-#define vtbl_sigelem	PERLvtbl_sigelem
-#define vtbl_substr	PERLvtbl_substr
-#define vtbl_sv		PERLvtbl_sv
-#define vtbl_taint	PERLvtbl_taint
-#define vtbl_uvar	PERLvtbl_uvar
-#define vtbl_vec	PERLvtbl_vec
-#define warn_nl		PERLwarn_nl
-#define warn_nosemi	PERLwarn_nosemi
-#define warn_reserved	PERLwarn_reserved
-#define watchaddr	PERLwatchaddr
-#define watchok		PERLwatchok
-#define yychar		PERLyychar
-#define yycheck		PERLyycheck
-#define yydebug		PERLyydebug
-#define yydefred	PERLyydefred
-#define yydgoto		PERLyydgoto
-#define yyerrflag	PERLyyerrflag
-#define yygindex	PERLyygindex
-#define yylen		PERLyylen
-#define yylhs		PERLyylhs
-#define yylval		PERLyylval
-#define yyname		PERLyyname
-#define yynerrs		PERLyynerrs
-#define yyrindex	PERLyyrindex
-#define yyrule		PERLyyrule
-#define yysindex	PERLyysindex
-#define yytable		PERLyytable
-#define yyval		PERLyyval
-#define append_elem	PERLappend_elem
-#define append_list	PERLappend_list
-#define apply		PERLapply
-#define av_clear	PERLav_clear
-#define av_fake		PERLav_fake
-#define av_fetch	PERLav_fetch
-#define av_fill		PERLav_fill
-#define av_free		PERLav_free
-#define av_len		PERLav_len
-#define av_make		PERLav_make
-#define av_pop		PERLav_pop
-#define av_popnulls	PERLav_popnulls
-#define av_push		PERLav_push
-#define av_shift	PERLav_shift
-#define av_store	PERLav_store
-#define av_undef	PERLav_undef
-#define av_unshift	PERLav_unshift
-#define bind_match	PERLbind_match
-#define block_head	PERLblock_head
-#define calllist	PERLcalllist
-#define cando		PERLcando
-#define check_uni	PERLcheck_uni
-#define checkcomma	PERLcheckcomma
-#define ck_aelem	PERLck_aelem
-#define ck_chop		PERLck_chop
-#define ck_concat	PERLck_concat
-#define ck_eof		PERLck_eof
-#define ck_eval		PERLck_eval
-#define ck_exec		PERLck_exec
-#define ck_formline	PERLck_formline
-#define ck_ftst		PERLck_ftst
-#define ck_fun		PERLck_fun
-#define ck_glob		PERLck_glob
-#define ck_grep		PERLck_grep
-#define ck_gvconst	PERLck_gvconst
-#define ck_index	PERLck_index
-#define ck_lengthconst	PERLck_lengthconst
-#define ck_lfun		PERLck_lfun
-#define ck_listiob	PERLck_listiob
-#define ck_match	PERLck_match
-#define ck_null		PERLck_null
-#define ck_repeat	PERLck_repeat
-#define ck_retarget	PERLck_retarget
-#define ck_rvconst	PERLck_rvconst
-#define ck_select	PERLck_select
-#define ck_shift	PERLck_shift
-#define ck_sort		PERLck_sort
-#define ck_split	PERLck_split
-#define ck_subr		PERLck_subr
-#define ck_trunc	PERLck_trunc
-#define convert		PERLconvert
-#define cpy7bit		PERLcpy7bit
-#define cpytill		PERLcpytill
-#define croak		PERLcroak
-#define cv_clear	PERLcv_clear
-#define cxinc		PERLcxinc
-#define deb		PERLdeb
-#define deb_growlevel	PERLdeb_growlevel
-#define debop		PERLdebop
-#define debstack	PERLdebstack
-#define debstackptrs	PERLdebstackptrs
-#define die		PERLdie
-#define die_where	PERLdie_where
-#define do_aexec	PERLdo_aexec
-#define do_chop		PERLdo_chop
-#define do_close	PERLdo_close
-#define do_ctl		PERLdo_ctl
-#define do_eof		PERLdo_eof
-#define do_exec		PERLdo_exec
-#define do_execfree	PERLdo_execfree
-#define do_ipcctl	PERLdo_ipcctl
-#define do_ipcget	PERLdo_ipcget
-#define do_join		PERLdo_join
-#define do_kv		PERLdo_kv
-#define do_msgrcv	PERLdo_msgrcv
-#define do_msgsnd	PERLdo_msgsnd
-#define do_open		PERLdo_open
-#define do_pipe		PERLdo_pipe
-#define do_print	PERLdo_print
-#define do_readline	PERLdo_readline
-#define do_seek		PERLdo_seek
-#define do_semop	PERLdo_semop
-#define do_shmio	PERLdo_shmio
-#define do_sprintf	PERLdo_sprintf
-#define do_tell		PERLdo_tell
-#define do_trans	PERLdo_trans
-#define do_vecset	PERLdo_vecset
-#define do_vop		PERLdo_vop
-#define doeval		PERLdoeval
-#define dofindlabel	PERLdofindlabel
-#define dopoptoeval	PERLdopoptoeval
-#define dump_all	PERLdump_all
-#define dump_eval	PERLdump_eval
-#define dump_gv		PERLdump_gv
-#define dump_op		PERLdump_op
-#define dump_packsubs	PERLdump_packsubs
-#define dump_pm		PERLdump_pm
-#define dump_sub	PERLdump_sub
-#define fbm_compile	PERLfbm_compile
-#define fbm_instr	PERLfbm_instr
-#define fetch_gv	PERLfetch_gv
-#define fetch_io	PERLfetch_io
-#define fetch_stash	PERLfetch_stash
-#define fold_constants	PERLfold_constants
-#define force_ident	PERLforce_ident
-#define force_next	PERLforce_next
-#define force_word	PERLforce_word
-#define free_tmps	PERLfree_tmps
-#define gen_constant_list	PERLgen_constant_list
-#define getgimme	PERLgetgimme
-#define gp_free		PERLgp_free
-#define gp_ref		PERLgp_ref
-#define gv_AVadd	PERLgv_AVadd
-#define gv_HVadd	PERLgv_HVadd
-#define gv_check	PERLgv_check
-#define gv_efullname	PERLgv_efullname
-#define gv_fetchfile	PERLgv_fetchfile
-#define gv_fetchmeth	PERLgv_fetchmeth
-#define gv_fetchmethod	PERLgv_fetchmethod
-#define gv_fetchpv	PERLgv_fetchpv
-#define gv_fullname	PERLgv_fullname
-#define gv_init		PERLgv_init
-#define he_delayfree	PERLhe_delayfree
-#define he_free		PERLhe_free
-#define hoistmust	PERLhoistmust
-#define hv_clear	PERLhv_clear
-#define hv_delete	PERLhv_delete
-#define hv_fetch	PERLhv_fetch
-#define hv_free		PERLhv_free
-#define hv_iterinit	PERLhv_iterinit
-#define hv_iterkey	PERLhv_iterkey
-#define hv_iternext	PERLhv_iternext
-#define hv_iterval	PERLhv_iterval
-#define hv_magic	PERLhv_magic
-#define hv_store	PERLhv_store
-#define hv_undef	PERLhv_undef
-#define ibcmp		PERLibcmp
-#define ingroup		PERLingroup
-#define instr		PERLinstr
-#define intuit_more	PERLintuit_more
-#define invert		PERLinvert
-#define jmaybe		PERLjmaybe
-#define keyword		PERLkeyword
-#define leave_scope	PERLleave_scope
-#define lex_end		PERLlex_end
-#define lex_start	PERLlex_start
-#define linklist	PERLlinklist
-#define list		PERLlist
-#define listkids	PERLlistkids
-#define localize	PERLlocalize
-#define looks_like_number	PERLlooks_like_number
-#define magic_clearpack	PERLmagic_clearpack
-#define magic_get	PERLmagic_get
-#define magic_getarylen	PERLmagic_getarylen
-#define magic_getglob	PERLmagic_getglob
-#define magic_getpack	PERLmagic_getpack
-#define magic_gettaint	PERLmagic_gettaint
-#define magic_getuvar	PERLmagic_getuvar
-#define magic_len	PERLmagic_len
-#define magic_nextpack	PERLmagic_nextpack
-#define magic_set	PERLmagic_set
-#define magic_setarylen	PERLmagic_setarylen
-#define magic_setbm	PERLmagic_setbm
-#define magic_setdbline	PERLmagic_setdbline
-#define magic_setenv	PERLmagic_setenv
-#define magic_setglob	PERLmagic_setglob
-#define magic_setisa	PERLmagic_setisa
-#define magic_setmglob	PERLmagic_setmglob
-#define magic_setpack	PERLmagic_setpack
-#define magic_setsig	PERLmagic_setsig
-#define magic_setsubstr	PERLmagic_setsubstr
-#define magic_settaint	PERLmagic_settaint
-#define magic_setuvar	PERLmagic_setuvar
-#define magic_setvec	PERLmagic_setvec
-#define magicname	PERLmagicname
-#define mess		PERLmess
-#define mg_clear	PERLmg_clear
-#define mg_copy		PERLmg_copy
-#define mg_find		PERLmg_find
-#define mg_free		PERLmg_free
-#define mg_get		PERLmg_get
-#define mg_len		PERLmg_len
-#define mg_set		PERLmg_set
-#define mod		PERLmod
-#define modkids		PERLmodkids
-#define moreswitches	PERLmoreswitches
-#define my		PERLmy
-#define my_exit		PERLmy_exit
-#define my_lstat	PERLmy_lstat
-#define my_pclose	PERLmy_pclose
-#define my_popen	PERLmy_popen
-#define my_setenv	PERLmy_setenv
-#define my_stat		PERLmy_stat
-#define my_unexec	PERLmy_unexec
-#define newANONHASH	PERLnewANONHASH
-#define newANONLIST	PERLnewANONLIST
-#define newASSIGNOP	PERLnewASSIGNOP
-#define newAV		PERLnewAV
-#define newAVREF	PERLnewAVREF
-#define newBINOP	PERLnewBINOP
-#define newCONDOP	PERLnewCONDOP
-#define newCVOP		PERLnewCVOP
-#define newCVREF	PERLnewCVREF
-#define newFORM		PERLnewFORM
-#define newFOROP	PERLnewFOROP
-#define newGVOP		PERLnewGVOP
-#define newGVREF	PERLnewGVREF
-#define newGVgen	PERLnewGVgen
-#define newHV		PERLnewHV
-#define newHVREF	PERLnewHVREF
-#define newIO		PERLnewIO
-#define newLISTOP	PERLnewLISTOP
-#define newLOGOP	PERLnewLOGOP
-#define newLOOPOP	PERLnewLOOPOP
-#define newMETHOD	PERLnewMETHOD
-#define newNULLLIST	PERLnewNULLLIST
-#define newOP		PERLnewOP
-#define newPMOP		PERLnewPMOP
-#define newPVOP		PERLnewPVOP
-#define newRANGE	PERLnewRANGE
-#define newSLICEOP	PERLnewSLICEOP
-#define newSTATEOP	PERLnewSTATEOP
-#define newSUB		PERLnewSUB
-#define newSV		PERLnewSV
-#define newSVOP		PERLnewSVOP
-#define newSVREF	PERLnewSVREF
-#define newSViv		PERLnewSViv
-#define newSVnv		PERLnewSVnv
-#define newSVpv		PERLnewSVpv
-#define newSVsv		PERLnewSVsv
-#define newUNOP		PERLnewUNOP
-#define newWHILEOP	PERLnewWHILEOP
-#define newXSUB		PERLnewXSUB
-#define nextargv	PERLnextargv
-#define ninstr		PERLninstr
-#define no_fh_allowed	PERLno_fh_allowed
-#define no_op		PERLno_op
-#define nsavestr	PERLnsavestr
-#define oopsAV		PERLoopsAV
-#define oopsCV		PERLoopsCV
-#define oopsHV		PERLoopsHV
-#define op_free		PERLop_free
-#define package		PERLpackage
-#define pad_alloc	PERLpad_alloc
-#define pad_allocmy	PERLpad_allocmy
-#define pad_findmy	PERLpad_findmy
-#define pad_free	PERLpad_free
-#define pad_leavemy	PERLpad_leavemy
-#define pad_reset	PERLpad_reset
-#define pad_sv		PERLpad_sv
-#define pad_swipe	PERLpad_swipe
-#define peep		PERLpeep
-#define pidgone		PERLpidgone
-#define pmruntime	PERLpmruntime
-#define pmtrans		PERLpmtrans
-#define pop_return	PERLpop_return
-#define pop_scope	PERLpop_scope
-#define pp_aassign	PERLpp_aassign
-#define pp_accept	PERLpp_accept
-#define pp_add		PERLpp_add
-#define pp_aelem	PERLpp_aelem
-#define pp_aelemfast	PERLpp_aelemfast
-#define pp_alarm	PERLpp_alarm
-#define pp_and		PERLpp_and
-#define pp_andassign	PERLpp_andassign
-#define pp_anonhash	PERLpp_anonhash
-#define pp_anonlist	PERLpp_anonlist
-#define pp_aslice	PERLpp_aslice
-#define pp_atan2	PERLpp_atan2
-#define pp_av2arylen	PERLpp_av2arylen
-#define pp_backtick	PERLpp_backtick
-#define pp_bind		PERLpp_bind
-#define pp_binmode	PERLpp_binmode
-#define pp_bit_and	PERLpp_bit_and
-#define pp_bit_or	PERLpp_bit_or
-#define pp_bless	PERLpp_bless
-#define pp_caller	PERLpp_caller
-#define pp_chdir	PERLpp_chdir
-#define pp_chmod	PERLpp_chmod
-#define pp_chop		PERLpp_chop
-#define pp_chown	PERLpp_chown
-#define pp_chroot	PERLpp_chroot
-#define pp_close	PERLpp_close
-#define pp_closedir	PERLpp_closedir
-#define pp_complement	PERLpp_complement
-#define pp_concat	PERLpp_concat
-#define pp_cond_expr	PERLpp_cond_expr
-#define pp_connect	PERLpp_connect
-#define pp_const	PERLpp_const
-#define pp_cos		PERLpp_cos
-#define pp_crypt	PERLpp_crypt
-#define pp_cswitch	PERLpp_cswitch
-#define pp_dbmclose	PERLpp_dbmclose
-#define pp_dbmopen	PERLpp_dbmopen
-#define pp_dbstate	PERLpp_dbstate
-#define pp_defined	PERLpp_defined
-#define pp_delete	PERLpp_delete
-#define pp_die		PERLpp_die
-#define pp_divide	PERLpp_divide
-#define pp_dofile	PERLpp_dofile
-#define pp_done		PERLpp_done
-#define pp_dump		PERLpp_dump
-#define pp_each		PERLpp_each
-#define pp_egrent	PERLpp_egrent
-#define pp_ehostent	PERLpp_ehostent
-#define pp_enetent	PERLpp_enetent
-#define pp_enter	PERLpp_enter
-#define pp_entereval	PERLpp_entereval
-#define pp_enteriter	PERLpp_enteriter
-#define pp_enterloop	PERLpp_enterloop
-#define pp_entersubr	PERLpp_entersubr
-#define pp_entertry	PERLpp_entertry
-#define pp_enterwrite	PERLpp_enterwrite
-#define pp_eof		PERLpp_eof
-#define pp_eprotoent	PERLpp_eprotoent
-#define pp_epwent	PERLpp_epwent
-#define pp_eq		PERLpp_eq
-#define pp_eservent	PERLpp_eservent
-#define pp_evalonce	PERLpp_evalonce
-#define pp_exec		PERLpp_exec
-#define pp_exit		PERLpp_exit
-#define pp_exp		PERLpp_exp
-#define pp_fcntl	PERLpp_fcntl
-#define pp_fileno	PERLpp_fileno
-#define pp_flip		PERLpp_flip
-#define pp_flock	PERLpp_flock
-#define pp_flop		PERLpp_flop
-#define pp_fork		PERLpp_fork
-#define pp_formline	PERLpp_formline
-#define pp_ftatime	PERLpp_ftatime
-#define pp_ftbinary	PERLpp_ftbinary
-#define pp_ftblk	PERLpp_ftblk
-#define pp_ftchr	PERLpp_ftchr
-#define pp_ftctime	PERLpp_ftctime
-#define pp_ftdir	PERLpp_ftdir
-#define pp_fteexec	PERLpp_fteexec
-#define pp_fteowned	PERLpp_fteowned
-#define pp_fteread	PERLpp_fteread
-#define pp_ftewrite	PERLpp_ftewrite
-#define pp_ftfile	PERLpp_ftfile
-#define pp_ftis		PERLpp_ftis
-#define pp_ftlink	PERLpp_ftlink
-#define pp_ftmtime	PERLpp_ftmtime
-#define pp_ftpipe	PERLpp_ftpipe
-#define pp_ftrexec	PERLpp_ftrexec
-#define pp_ftrowned	PERLpp_ftrowned
-#define pp_ftrread	PERLpp_ftrread
-#define pp_ftrwrite	PERLpp_ftrwrite
-#define pp_ftsgid	PERLpp_ftsgid
-#define pp_ftsize	PERLpp_ftsize
-#define pp_ftsock	PERLpp_ftsock
-#define pp_ftsuid	PERLpp_ftsuid
-#define pp_ftsvtx	PERLpp_ftsvtx
-#define pp_fttext	PERLpp_fttext
-#define pp_fttty	PERLpp_fttty
-#define pp_ftzero	PERLpp_ftzero
-#define pp_ge		PERLpp_ge
-#define pp_getc		PERLpp_getc
-#define pp_getlogin	PERLpp_getlogin
-#define pp_getpeername	PERLpp_getpeername
-#define pp_getpgrp	PERLpp_getpgrp
-#define pp_getppid	PERLpp_getppid
-#define pp_getpriority	PERLpp_getpriority
-#define pp_getsockname	PERLpp_getsockname
-#define pp_ggrent	PERLpp_ggrent
-#define pp_ggrgid	PERLpp_ggrgid
-#define pp_ggrnam	PERLpp_ggrnam
-#define pp_ghbyaddr	PERLpp_ghbyaddr
-#define pp_ghbyname	PERLpp_ghbyname
-#define pp_ghostent	PERLpp_ghostent
-#define pp_glob		PERLpp_glob
-#define pp_gmtime	PERLpp_gmtime
-#define pp_gnbyaddr	PERLpp_gnbyaddr
-#define pp_gnbyname	PERLpp_gnbyname
-#define pp_gnetent	PERLpp_gnetent
-#define pp_goto		PERLpp_goto
-#define pp_gpbyname	PERLpp_gpbyname
-#define pp_gpbynumber	PERLpp_gpbynumber
-#define pp_gprotoent	PERLpp_gprotoent
-#define pp_gpwent	PERLpp_gpwent
-#define pp_gpwnam	PERLpp_gpwnam
-#define pp_gpwuid	PERLpp_gpwuid
-#define pp_grepstart	PERLpp_grepstart
-#define pp_grepwhile	PERLpp_grepwhile
-#define pp_gsbyname	PERLpp_gsbyname
-#define pp_gsbyport	PERLpp_gsbyport
-#define pp_gservent	PERLpp_gservent
-#define pp_gsockopt	PERLpp_gsockopt
-#define pp_gt		PERLpp_gt
-#define pp_gv		PERLpp_gv
-#define pp_gvsv		PERLpp_gvsv
-#define pp_helem	PERLpp_helem
-#define pp_hex		PERLpp_hex
-#define pp_hslice	PERLpp_hslice
-#define pp_index	PERLpp_index
-#define pp_indread	PERLpp_indread
-#define pp_int		PERLpp_int
-#define pp_intadd	PERLpp_intadd
-#define pp_interp	PERLpp_interp
-#define pp_ioctl	PERLpp_ioctl
-#define pp_iter		PERLpp_iter
-#define pp_join		PERLpp_join
-#define pp_keys		PERLpp_keys
-#define pp_kill		PERLpp_kill
-#define pp_last		PERLpp_last
-#define pp_lc		PERLpp_lc
-#define pp_lcfirst	PERLpp_lcfirst
-#define pp_le		PERLpp_le
-#define pp_leave	PERLpp_leave
-#define pp_leaveeval	PERLpp_leaveeval
-#define pp_leaveloop	PERLpp_leaveloop
-#define pp_leavesubr	PERLpp_leavesubr
-#define pp_leavetry	PERLpp_leavetry
-#define pp_leavewrite	PERLpp_leavewrite
-#define pp_left_shift	PERLpp_left_shift
-#define pp_length	PERLpp_length
-#define pp_lineseq	PERLpp_lineseq
-#define pp_link		PERLpp_link
-#define pp_list		PERLpp_list
-#define pp_listen	PERLpp_listen
-#define pp_localtime	PERLpp_localtime
-#define pp_log		PERLpp_log
-#define pp_lslice	PERLpp_lslice
-#define pp_lstat	PERLpp_lstat
-#define pp_lt		PERLpp_lt
-#define pp_match	PERLpp_match
-#define pp_method	PERLpp_method
-#define pp_mkdir	PERLpp_mkdir
-#define pp_modulo	PERLpp_modulo
-#define pp_msgctl	PERLpp_msgctl
-#define pp_msgget	PERLpp_msgget
-#define pp_msgrcv	PERLpp_msgrcv
-#define pp_msgsnd	PERLpp_msgsnd
-#define pp_multiply	PERLpp_multiply
-#define pp_ncmp		PERLpp_ncmp
-#define pp_ne		PERLpp_ne
-#define pp_negate	PERLpp_negate
-#define pp_next		PERLpp_next
-#define pp_nextstate	PERLpp_nextstate
-#define pp_not		PERLpp_not
-#define pp_nswitch	PERLpp_nswitch
-#define pp_null		PERLpp_null
-#define pp_oct		PERLpp_oct
-#define pp_open		PERLpp_open
-#define pp_open_dir	PERLpp_open_dir
-#define pp_or		PERLpp_or
-#define pp_orassign	PERLpp_orassign
-#define pp_ord		PERLpp_ord
-#define pp_pack		PERLpp_pack
-#define pp_padav	PERLpp_padav
-#define pp_padhv	PERLpp_padhv
-#define pp_padsv	PERLpp_padsv
-#define pp_pipe_op	PERLpp_pipe_op
-#define pp_pop		PERLpp_pop
-#define pp_postdec	PERLpp_postdec
-#define pp_postinc	PERLpp_postinc
-#define pp_pow		PERLpp_pow
-#define pp_predec	PERLpp_predec
-#define pp_preinc	PERLpp_preinc
-#define pp_print	PERLpp_print
-#define pp_prtf		PERLpp_prtf
-#define pp_push		PERLpp_push
-#define pp_pushmark	PERLpp_pushmark
-#define pp_pushre	PERLpp_pushre
-#define pp_rand		PERLpp_rand
-#define pp_range	PERLpp_range
-#define pp_rcatline	PERLpp_rcatline
-#define pp_read		PERLpp_read
-#define pp_readdir	PERLpp_readdir
-#define pp_readline	PERLpp_readline
-#define pp_readlink	PERLpp_readlink
-#define pp_recv		PERLpp_recv
-#define pp_redo		PERLpp_redo
-#define pp_ref		PERLpp_ref
-#define pp_refgen	PERLpp_refgen
-#define pp_regcmaybe	PERLpp_regcmaybe
-#define pp_regcomp	PERLpp_regcomp
-#define pp_rename	PERLpp_rename
-#define pp_repeat	PERLpp_repeat
-#define pp_require	PERLpp_require
-#define pp_reset	PERLpp_reset
-#define pp_return	PERLpp_return
-#define pp_reverse	PERLpp_reverse
-#define pp_rewinddir	PERLpp_rewinddir
-#define pp_right_shift	PERLpp_right_shift
-#define pp_rindex	PERLpp_rindex
-#define pp_rmdir	PERLpp_rmdir
-#define pp_rv2av	PERLpp_rv2av
-#define pp_rv2cv	PERLpp_rv2cv
-#define pp_rv2gv	PERLpp_rv2gv
-#define pp_rv2hv	PERLpp_rv2hv
-#define pp_rv2sv	PERLpp_rv2sv
-#define pp_sassign	PERLpp_sassign
-#define pp_scalar	PERLpp_scalar
-#define pp_schop	PERLpp_schop
-#define pp_scmp		PERLpp_scmp
-#define pp_scope	PERLpp_scope
-#define pp_seek		PERLpp_seek
-#define pp_seekdir	PERLpp_seekdir
-#define pp_select	PERLpp_select
-#define pp_semctl	PERLpp_semctl
-#define pp_semget	PERLpp_semget
-#define pp_semop	PERLpp_semop
-#define pp_send		PERLpp_send
-#define pp_seq		PERLpp_seq
-#define pp_setpgrp	PERLpp_setpgrp
-#define pp_setpriority	PERLpp_setpriority
-#define pp_sge		PERLpp_sge
-#define pp_sgrent	PERLpp_sgrent
-#define pp_sgt		PERLpp_sgt
-#define pp_shift	PERLpp_shift
-#define pp_shmctl	PERLpp_shmctl
-#define pp_shmget	PERLpp_shmget
-#define pp_shmread	PERLpp_shmread
-#define pp_shmwrite	PERLpp_shmwrite
-#define pp_shostent	PERLpp_shostent
-#define pp_shutdown	PERLpp_shutdown
-#define pp_sin		PERLpp_sin
-#define pp_sle		PERLpp_sle
-#define pp_sleep	PERLpp_sleep
-#define pp_slt		PERLpp_slt
-#define pp_sne		PERLpp_sne
-#define pp_snetent	PERLpp_snetent
-#define pp_socket	PERLpp_socket
-#define pp_sockpair	PERLpp_sockpair
-#define pp_sort		PERLpp_sort
-#define pp_splice	PERLpp_splice
-#define pp_split	PERLpp_split
-#define pp_sprintf	PERLpp_sprintf
-#define pp_sprotoent	PERLpp_sprotoent
-#define pp_spwent	PERLpp_spwent
-#define pp_sqrt		PERLpp_sqrt
-#define pp_srand	PERLpp_srand
-#define pp_sselect	PERLpp_sselect
-#define pp_sservent	PERLpp_sservent
-#define pp_ssockopt	PERLpp_ssockopt
-#define pp_stat		PERLpp_stat
-#define pp_stub		PERLpp_stub
-#define pp_study	PERLpp_study
-#define pp_subst	PERLpp_subst
-#define pp_substcont	PERLpp_substcont
-#define pp_substr	PERLpp_substr
-#define pp_subtract	PERLpp_subtract
-#define pp_sv2len	PERLpp_sv2len
-#define pp_symlink	PERLpp_symlink
-#define pp_syscall	PERLpp_syscall
-#define pp_sysread	PERLpp_sysread
-#define pp_system	PERLpp_system
-#define pp_syswrite	PERLpp_syswrite
-#define pp_tell		PERLpp_tell
-#define pp_telldir	PERLpp_telldir
-#define pp_tie		PERLpp_tie
-#define pp_time		PERLpp_time
-#define pp_tms		PERLpp_tms
-#define pp_trans	PERLpp_trans
-#define pp_truncate	PERLpp_truncate
-#define pp_uc		PERLpp_uc
-#define pp_ucfirst	PERLpp_ucfirst
-#define pp_umask	PERLpp_umask
-#define pp_undef	PERLpp_undef
-#define pp_unlink	PERLpp_unlink
-#define pp_unpack	PERLpp_unpack
-#define pp_unshift	PERLpp_unshift
-#define pp_unstack	PERLpp_unstack
-#define pp_untie	PERLpp_untie
-#define pp_utime	PERLpp_utime
-#define pp_values	PERLpp_values
-#define pp_vec		PERLpp_vec
-#define pp_wait		PERLpp_wait
-#define pp_waitpid	PERLpp_waitpid
-#define pp_wantarray	PERLpp_wantarray
-#define pp_warn		PERLpp_warn
-#define pp_xor		PERLpp_xor
-#define prepend_elem	PERLprepend_elem
-#define push_return	PERLpush_return
-#define push_scope	PERLpush_scope
-#define pv_grow		PERLpv_grow
-#define q		PERLq
-#define ref		PERLref
-#define refkids		PERLrefkids
-#define regcomp		PERLregcomp
-#define regdump		PERLregdump
-#define regexec		PERLregexec
-#define regfree		PERLregfree
-#define regnext		PERLregnext
-#define regprop		PERLregprop
-#define repeatcpy	PERLrepeatcpy
-#define rninstr		PERLrninstr
-#define run		PERLrun
-#define save_I32	PERLsave_I32
-#define save_aptr	PERLsave_aptr
-#define save_ary	PERLsave_ary
-#define save_hash	PERLsave_hash
-#define save_hptr	PERLsave_hptr
-#define save_int	PERLsave_int
-#define save_item	PERLsave_item
-#define save_list	PERLsave_list
-#define save_nogv	PERLsave_nogv
-#define save_scalar	PERLsave_scalar
-#define save_sptr	PERLsave_sptr
-#define save_svref	PERLsave_svref
-#define savestack_grow	PERLsavestack_grow
-#define savestr		PERLsavestr
-#define sawparens	PERLsawparens
-#define scalar		PERLscalar
-#define scalarkids	PERLscalarkids
-#define scalarseq	PERLscalarseq
-#define scalarvoid	PERLscalarvoid
-#define scan_const	PERLscan_const
-#define scan_formline	PERLscan_formline
-#define scan_heredoc	PERLscan_heredoc
-#define scan_hex	PERLscan_hex
-#define scan_ident	PERLscan_ident
-#define scan_inputsymbol	PERLscan_inputsymbol
-#define scan_num	PERLscan_num
-#define scan_oct	PERLscan_oct
-#define scan_pat	PERLscan_pat
-#define scan_prefix	PERLscan_prefix
-#define scan_str	PERLscan_str
-#define scan_subst	PERLscan_subst
-#define scan_trans	PERLscan_trans
-#define scan_word	PERLscan_word
-#define scope		PERLscope
-#define screaminstr	PERLscreaminstr
-#define setenv_getix	PERLsetenv_getix
-#define skipspace	PERLskipspace
-#define sublex_done	PERLsublex_done
-#define sublex_start	PERLsublex_start
-#define sv_2bool	PERLsv_2bool
-#define sv_2cv		PERLsv_2cv
-#define sv_2iv		PERLsv_2iv
-#define sv_2mortal	PERLsv_2mortal
-#define sv_2nv		PERLsv_2nv
-#define sv_2pv		PERLsv_2pv
-#define sv_backoff	PERLsv_backoff
-#define sv_catpv	PERLsv_catpv
-#define sv_catpvn	PERLsv_catpvn
-#define sv_catsv	PERLsv_catsv
-#define sv_chop		PERLsv_chop
-#define sv_clear	PERLsv_clear
-#define sv_cmp		PERLsv_cmp
-#define sv_dec		PERLsv_dec
-#define sv_eq		PERLsv_eq
-#define sv_free		PERLsv_free
-#define sv_gets		PERLsv_gets
-#define sv_grow		PERLsv_grow
-#define sv_inc		PERLsv_inc
-#define sv_insert	PERLsv_insert
-#define sv_isa		PERLsv_isa
-#define sv_len		PERLsv_len
-#define sv_magic	PERLsv_magic
-#define sv_mortalcopy	PERLsv_mortalcopy
-#define sv_peek		PERLsv_peek
-#define sv_ref		PERLsv_ref
-#define sv_replace	PERLsv_replace
-#define sv_reset	PERLsv_reset
-#define sv_setiv	PERLsv_setiv
-#define sv_setnv	PERLsv_setnv
-#define sv_setptrobj	PERLsv_setptrobj
-#define sv_setpv	PERLsv_setpv
-#define sv_setpvn	PERLsv_setpvn
-#define sv_setsv	PERLsv_setsv
-#define sv_unmagic	PERLsv_unmagic
-#define sv_upgrade	PERLsv_upgrade
-#define sv_usepvn	PERLsv_usepvn
-#define taint_env	PERLtaint_env
-#define taint_not	PERLtaint_not
-#define taint_proper	PERLtaint_proper
-#define too_few_arguments	PERLtoo_few_arguments
-#define too_many_arguments	PERLtoo_many_arguments
-#define wait4pid	PERLwait4pid
-#define warn		PERLwarn
-#define watch		PERLwatch
-#define whichsig	PERLwhichsig
-#define yyerror		PERLyyerror
-#define yylex		PERLyylex
-#define yyparse		PERLyyparse
+#define No		perl_No
+#define Sv		perl_Sv
+#define Xpv		perl_Xpv
+#define Yes		perl_Yes
+#define additem		perl_additem
+#define an		perl_an
+#define buf		perl_buf
+#define bufend		perl_bufend
+#define bufptr		perl_bufptr
+#define check		perl_check
+#define coeff		perl_coeff
+#define compiling	perl_compiling
+#define comppad		perl_comppad
+#define comppad_name	perl_comppad_name
+#define comppad_name_fill	perl_comppad_name_fill
+#define cop_seqmax	perl_cop_seqmax
+#define cryptseen	perl_cryptseen
+#define cshlen		perl_cshlen
+#define cshname		perl_cshname
+#define curinterp	perl_curinterp
+#define curpad		perl_curpad
+#define dc		perl_dc
+#define di		perl_di
+#define ds		perl_ds
+#define egid		perl_egid
+#define error_count	perl_error_count
+#define euid		perl_euid
+#define evalseq		perl_evalseq
+#define evstr		perl_evstr
+#define expect		perl_expect
+#define expectterm	perl_expectterm
+#define fold		perl_fold
+#define freq		perl_freq
+#define gid		perl_gid
+#define hexdigit	perl_hexdigit
+#define in_format	perl_in_format
+#define in_my		perl_in_my
+#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 linestr		perl_linestr
+#define markstack	perl_markstack
+#define markstack_max	perl_markstack_max
+#define markstack_ptr	perl_markstack_ptr
+#define max_intro_pending	perl_max_intro_pending
+#define min_intro_pending	perl_min_intro_pending
+#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 needblockscope	perl_needblockscope
+#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 oldbufptr	perl_oldbufptr
+#define oldoldbufptr	perl_oldoldbufptr
+#define op		perl_op
+#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 padix		perl_padix
+#define patleave	perl_patleave
+#define ppaddr		perl_ppaddr
+#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 reglastparen	perl_reglastparen
+#define regmyendp	perl_regmyendp
+#define regmyp_size	perl_regmyp_size
+#define regmystartp	perl_regmystartp
+#define regnarrate	perl_regnarrate
+#define regnpar		perl_regnpar
+#define regparse	perl_regparse
+#define regprecomp	perl_regprecomp
+#define regprev		perl_regprev
+#define regsawback	perl_regsawback
+#define regsawbracket	perl_regsawbracket
+#define regsize		perl_regsize
+#define regstartp	perl_regstartp
+#define regtill		perl_regtill
+#define regxend		perl_regxend
+#define retstack	perl_retstack
+#define retstack_ix	perl_retstack_ix
+#define retstack_max	perl_retstack_max
+#define rsfp		perl_rsfp
+#define savestack	perl_savestack
+#define savestack_ix	perl_savestack_ix
+#define savestack_max	perl_savestack_max
+#define saw_return	perl_saw_return
+#define scopestack	perl_scopestack
+#define scopestack_ix	perl_scopestack_ix
+#define scopestack_max	perl_scopestack_max
+#define scrgv		perl_scrgv
+#define sig_name	perl_sig_name
+#define simple		perl_simple
+#define stack_base	perl_stack_base
+#define stack_max	perl_stack_max
+#define stack_sp	perl_stack_sp
+#define statbuf		perl_statbuf
+#define sub_generation	perl_sub_generation
+#define subline		perl_subline
+#define subname		perl_subname
+#define sv_no		perl_sv_no
+#define sv_undef	perl_sv_undef
+#define sv_yes		perl_sv_yes
+#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_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_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 append_elem	perl_append_elem
+#define append_list	perl_append_list
+#define apply		perl_apply
+#define av_clear	perl_av_clear
+#define av_fake		perl_av_fake
+#define av_fetch	perl_av_fetch
+#define av_fill		perl_av_fill
+#define av_free		perl_av_free
+#define av_len		perl_av_len
+#define av_make		perl_av_make
+#define av_pop		perl_av_pop
+#define av_popnulls	perl_av_popnulls
+#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_head	perl_block_head
+#define calllist	perl_calllist
+#define cando		perl_cando
+#define check_uni	perl_check_uni
+#define checkcomma	perl_checkcomma
+#define ck_aelem	perl_ck_aelem
+#define ck_chop		perl_ck_chop
+#define ck_concat	perl_ck_concat
+#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_retarget	perl_ck_retarget
+#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_split	perl_ck_split
+#define ck_subr		perl_ck_subr
+#define ck_trunc	perl_ck_trunc
+#define convert		perl_convert
+#define cpy7bit		perl_cpy7bit
+#define cpytill		perl_cpytill
+#define croak		perl_croak
+#define cv_clear	perl_cv_clear
+#define cxinc		perl_cxinc
+#define deb		perl_deb
+#define deb_growlevel	perl_deb_growlevel
+#define debop		perl_debop
+#define debstack	perl_debstack
+#define debstackptrs	perl_debstackptrs
+#define die		perl_die
+#define die_where	perl_die_where
+#define do_aexec	perl_do_aexec
+#define do_chop		perl_do_chop
+#define do_close	perl_do_close
+#define do_ctl		perl_do_ctl
+#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 dump_all	perl_dump_all
+#define dump_eval	perl_dump_eval
+#define dump_gv		perl_dump_gv
+#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 fetch_stash	perl_fetch_stash
+#define fold_constants	perl_fold_constants
+#define force_ident	perl_force_ident
+#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 getgimme	perl_getgimme
+#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_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 he_delayfree	perl_he_delayfree
+#define he_free		perl_he_free
+#define hoistmust	perl_hoistmust
+#define hv_clear	perl_hv_clear
+#define hv_delete	perl_hv_delete
+#define hv_fetch	perl_hv_fetch
+#define hv_free		perl_hv_free
+#define hv_iterinit	perl_hv_iterinit
+#define hv_iterkey	perl_hv_iterkey
+#define hv_iternext	perl_hv_iternext
+#define hv_iterval	perl_hv_iterval
+#define hv_magic	perl_hv_magic
+#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_clearpack	perl_magic_clearpack
+#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_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_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_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 magicname	perl_magicname
+#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 my		perl_my
+#define my_exit		perl_my_exit
+#define my_lstat	perl_my_lstat
+#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_unexec	perl_my_unexec
+#define newANONHASH	perl_newANONHASH
+#define newANONLIST	perl_newANONLIST
+#define newASSIGNOP	perl_newASSIGNOP
+#define newAV		perl_newAV
+#define newAVREF	perl_newAVREF
+#define newBINOP	perl_newBINOP
+#define newCONDOP	perl_newCONDOP
+#define newCVOP		perl_newCVOP
+#define newCVREF	perl_newCVREF
+#define newFORM		perl_newFORM
+#define newFOROP	perl_newFOROP
+#define 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 newMETHOD	perl_newMETHOD
+#define newNULLLIST	perl_newNULLLIST
+#define newOP		perl_newOP
+#define newPMOP		perl_newPMOP
+#define newPVOP		perl_newPVOP
+#define newRANGE	perl_newRANGE
+#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 newSVsv		perl_newSVsv
+#define newUNOP		perl_newUNOP
+#define newWHILEOP	perl_newWHILEOP
+#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 nsavestr	perl_nsavestr
+#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 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_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_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_bless	perl_pp_bless
+#define pp_caller	perl_pp_caller
+#define pp_chdir	perl_pp_chdir
+#define pp_chmod	perl_pp_chmod
+#define pp_chop		perl_pp_chop
+#define pp_chown	perl_pp_chown
+#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_done		perl_pp_done
+#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_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_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_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_index	perl_pp_index
+#define pp_indread	perl_pp_indread
+#define pp_int		perl_pp_int
+#define pp_intadd	perl_pp_intadd
+#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_leavesubr	perl_pp_leavesubr
+#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_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_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_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_prtf		perl_pp_prtf
+#define pp_push		perl_pp_push
+#define pp_pushmark	perl_pp_pushmark
+#define pp_pushre	perl_pp_pushre
+#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_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_sselect	perl_pp_sselect
+#define pp_sservent	perl_pp_sservent
+#define pp_ssockopt	perl_pp_ssockopt
+#define pp_stat		perl_pp_stat
+#define pp_stub		perl_pp_stub
+#define pp_study	perl_pp_study
+#define pp_subst	perl_pp_subst
+#define pp_substcont	perl_pp_substcont
+#define pp_substr	perl_pp_substr
+#define pp_subtract	perl_pp_subtract
+#define pp_sv2len	perl_pp_sv2len
+#define pp_symlink	perl_pp_symlink
+#define pp_syscall	perl_pp_syscall
+#define pp_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_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 prepend_elem	perl_prepend_elem
+#define push_return	perl_push_return
+#define push_scope	perl_push_scope
+#define q		perl_q
+#define ref		perl_ref
+#define refkids		perl_refkids
+#define regcomp		perl_regcomp
+#define regdump		perl_regdump
+#define regexec		perl_regexec
+#define regfree		perl_regfree
+#define regnext		perl_regnext
+#define regprop		perl_regprop
+#define repeatcpy	perl_repeatcpy
+#define rninstr		perl_rninstr
+#define run		perl_run
+#define 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_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_nogv	perl_save_nogv
+#define save_scalar	perl_save_scalar
+#define save_sptr	perl_save_sptr
+#define save_svref	perl_save_svref
+#define savestack_grow	perl_savestack_grow
+#define savestr		perl_savestr
+#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 setenv_getix	perl_setenv_getix
+#define skipspace	perl_skipspace
+#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_2iv		perl_sv_2iv
+#define sv_2mortal	perl_sv_2mortal
+#define sv_2nv		perl_sv_2nv
+#define sv_2pv		perl_sv_2pv
+#define sv_backoff	perl_sv_backoff
+#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_magic	perl_sv_clean_magic
+#define sv_clean_refs	perl_sv_clean_refs
+#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_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_len		perl_sv_len
+#define sv_magic	perl_sv_magic
+#define sv_mortalcopy	perl_sv_mortalcopy
+#define sv_newmortal	perl_sv_newmortal
+#define sv_peek		perl_sv_peek
+#define sv_ref		perl_sv_ref
+#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_setsv	perl_sv_setsv
+#define sv_unmagic	perl_sv_unmagic
+#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 wait4pid	perl_wait4pid
+#define warn		perl_warn
+#define watch		perl_watch
+#define whichsig	perl_whichsig
+#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 yyerror		perl_yyerror
+#define yylex		perl_yylex
+#define yyparse		perl_yyparse
+#define yywarn		perl_yywarn
 
-#endif /* EMBEDDED */
+#endif /* EMBED */
 
-/* Put interpreter specific variables into a struct? */
+/* Put interpreter specific symbols into a struct? */
 
 #ifdef MULTIPLICITY
 
@@ -916,7 +939,6 @@
 #define forkprocess	(curinterp->Iforkprocess)
 #define formfeed	(curinterp->Iformfeed)
 #define formtarget	(curinterp->Iformtarget)
-#define freestrroot	(curinterp->Ifreestrroot)
 #define gensym		(curinterp->Igensym)
 #define in_eval		(curinterp->Iin_eval)
 #define incgv		(curinterp->Iincgv)
@@ -993,6 +1015,10 @@
 #define statusvalue	(curinterp->Istatusvalue)
 #define stdingv		(curinterp->Istdingv)
 #define strchop		(curinterp->Istrchop)
+#define sv_count	(curinterp->Isv_count)
+#define sv_rvcount	(curinterp->Isv_rvcount)
+#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)
@@ -1003,7 +1029,7 @@
 #define toptarget	(curinterp->Itoptarget)
 #define unsafe		(curinterp->Iunsafe)
 
-#else	/* not multiple, so translate interpreter variables the other way... */
+#else	/* not multiple, so translate interpreter symbols the other way... */
 
 #define IArgv		Argv
 #define ICmd		Cmd
@@ -1063,7 +1089,6 @@
 #define Iforkprocess	forkprocess
 #define Iformfeed	formfeed
 #define Iformtarget	formtarget
-#define Ifreestrroot	freestrroot
 #define Igensym		gensym
 #define Iin_eval	in_eval
 #define Iincgv		incgv
@@ -1140,6 +1165,10 @@
 #define Istatusvalue	statusvalue
 #define Istdingv	stdingv
 #define Istrchop	strchop
+#define Isv_count	sv_count
+#define Isv_rvcount	sv_rvcount
+#define Isv_root	sv_root
+#define Isv_arenaroot	sv_arenaroot
 #define Itainted	tainted
 #define Itainting	tainting
 #define Itmps_floor	tmps_floor
@@ -1150,4 +1179,4 @@
 #define Itoptarget	toptarget
 #define Iunsafe		unsafe
 
-#endif /* MULTIPLE_INTERPRETERS */
+#endif /* MULTIPLICITY */