embed.pl now reads *var*.h to do its stuff.
[p5sagit/p5-mst-13.2.git] / embed.h
diff --git a/embed.h b/embed.h
index caa1936..8a475a9 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -1,6 +1,6 @@
 /* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!! 
-   This file is built by embed.pl from global.sym and interp.sym.
-   Any changes made here will be lost!
+   This file is built by embed.pl from global.sym, intrpvar.h,
+   and thrdvar.h.  Any changes made here will be lost!
 */
 
 /* (Doing namespace management portably in C is really gross.) */
@@ -23,8 +23,6 @@
 #define Error                  Perl_Error
 #define Gv_AMupdate            Perl_Gv_AMupdate
 #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 cshlen                 Perl_cshlen
 #define cshname                        Perl_cshname
 #define curinterp              Perl_curinterp
-#define curpad                 Perl_curpad
 #define cv_ckproto             Perl_cv_ckproto
 #define cv_clone               Perl_cv_clone
 #define cv_const_sv            Perl_cv_const_sv
 #define eq_amg                 Perl_eq_amg
 #define error_count            Perl_error_count
 #define euid                   Perl_euid
+#define eval_cond              Perl_eval_cond
+#define eval_mutex             Perl_eval_mutex
+#define eval_owner             Perl_eval_owner
 #define evalseq                        Perl_evalseq
 #define exp_amg                        Perl_exp_amg
 #define expect                 Perl_expect
 #define magic_wipepack         Perl_magic_wipepack
 #define magicname              Perl_magicname
 #define malloc_mutex           Perl_malloc_mutex
-#define markstack              Perl_markstack
 #define markstack_grow         Perl_markstack_grow
-#define markstack_max          Perl_markstack_max
-#define markstack_ptr          Perl_markstack_ptr
 #define max_intro_pending      Perl_max_intro_pending
 #define maxo                   Perl_maxo
 #define mem_collxfrm           Perl_mem_collxfrm
 #define oopsAV                 Perl_oopsAV
 #define oopsCV                 Perl_oopsCV
 #define oopsHV                 Perl_oopsHV
-#define op                     Perl_op
 #define op_desc                        Perl_op_desc
 #define op_free                        Perl_op_free
 #define op_name                        Perl_op_name
 #define op_seqmax              Perl_op_seqmax
 #define opargs                 Perl_opargs
-#define opsave                 Perl_opsave
 #define origalen               Perl_origalen
 #define origenviron            Perl_origenviron
 #define osname                 Perl_osname
 #define repeat_amg             Perl_repeat_amg
 #define repeat_ass_amg         Perl_repeat_ass_amg
 #define repeatcpy              Perl_repeatcpy
-#define retstack               Perl_retstack
-#define retstack_ix            Perl_retstack_ix
-#define retstack_max           Perl_retstack_max
 #define rninstr                        Perl_rninstr
 #define rsfp                   Perl_rsfp
 #define rsfp_filters           Perl_rsfp_filters
 #define save_threadsv          Perl_save_threadsv
 #define savepv                 Perl_savepv
 #define savepvn                        Perl_savepvn
-#define savestack              Perl_savestack
 #define savestack_grow         Perl_savestack_grow
-#define savestack_ix           Perl_savestack_ix
-#define savestack_max          Perl_savestack_max
 #define saw_return             Perl_saw_return
 #define sawparens              Perl_sawparens
 #define scalar                 Perl_scalar
 #define scan_word              Perl_scan_word
 #define scmp_amg               Perl_scmp_amg
 #define scope                  Perl_scope
-#define scopestack             Perl_scopestack
-#define scopestack_ix          Perl_scopestack_ix
-#define scopestack_max         Perl_scopestack_max
 #define screaminstr            Perl_screaminstr
 #define scrgv                  Perl_scrgv
 #define seq_amg                        Perl_seq_amg
 #define slt_amg                        Perl_slt_amg
 #define sne_amg                        Perl_sne_amg
 #define sqrt_amg               Perl_sqrt_amg
-#define stack_base             Perl_stack_base
 #define stack_grow             Perl_stack_grow
-#define stack_max              Perl_stack_max
-#define stack_sp               Perl_stack_sp
 #define start_subparse         Perl_start_subparse
-#define statbuf                        Perl_statbuf
 #define string_amg             Perl_string_amg
 #define sub_crush_depth                Perl_sub_crush_depth
 #define sub_generation         Perl_sub_generation
 #define sv_len                 Perl_sv_len
 #define sv_magic               Perl_sv_magic
 #define sv_mortalcopy          Perl_sv_mortalcopy
+#define sv_mutex               Perl_sv_mutex
 #define sv_newmortal           Perl_sv_newmortal
 #define sv_newref              Perl_sv_newref
 #define sv_no                  Perl_sv_no
 #define thr_key                        Perl_thr_key
 #define threads_mutex          Perl_threads_mutex
 #define threadsv_names         Perl_threadsv_names
-#define timesbuf               Perl_timesbuf
 #define tokenbuf               Perl_tokenbuf
 #define too_few_arguments      Perl_too_few_arguments
 #define too_many_arguments     Perl_too_many_arguments
 #define vtbl_pack              Perl_vtbl_pack
 #define vtbl_packelem          Perl_vtbl_packelem
 #define vtbl_pos               Perl_vtbl_pos
+#define vtbl_regexp            Perl_vtbl_regexp
 #define vtbl_sig               Perl_vtbl_sig
 #define vtbl_sigelem           Perl_vtbl_sigelem
 #define vtbl_substr            Perl_vtbl_substr
 
 #endif /* EMBED */
 
-/* Put interpreter-specific symbols into a struct? */
-
-#ifdef MULTIPLICITY
-
-#define Argv                   (curinterp->IArgv)
-#define Cmd                    (curinterp->ICmd)
-#define DBgv                   (curinterp->IDBgv)
-#define DBline                 (curinterp->IDBline)
-#define DBsignal               (curinterp->IDBsignal)
-#define DBsingle               (curinterp->IDBsingle)
-#define DBsub                  (curinterp->IDBsub)
-#define DBtrace                        (curinterp->IDBtrace)
-#define allgvs                 (curinterp->Iallgvs)
-#define ampergv                        (curinterp->Iampergv)
-#define argvgv                 (curinterp->Iargvgv)
-#define argvoutgv              (curinterp->Iargvoutgv)
-#define basetime               (curinterp->Ibasetime)
-#define beginav                        (curinterp->Ibeginav)
-#define bodytarget             (curinterp->Ibodytarget)
-#define cddir                  (curinterp->Icddir)
-#define chopset                        (curinterp->Ichopset)
-#define copline                        (curinterp->Icopline)
-#define curblock               (curinterp->Icurblock)
-#define curcop                 (curinterp->Icurcop)
-#define 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 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 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 globalstash            (curinterp->Iglobalstash)
-#define in_eval                        (curinterp->Iin_eval)
-#define incgv                  (curinterp->Iincgv)
-#define initav                 (curinterp->Iinitav)
-#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 mess_sv                        (curinterp->Imess_sv)
-#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 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 perl_destruct_level    (curinterp->Iperl_destruct_level)
-#define perldb                 (curinterp->Iperldb)
-#define preambleav             (curinterp->Ipreambleav)
-#define preambled              (curinterp->Ipreambled)
-#define preprocess             (curinterp->Ipreprocess)
-#define restartop              (curinterp->Irestartop)
-#define rightgv                        (curinterp->Irightgv)
-#define rs                     (curinterp->Irs)
-#define sawampersand           (curinterp->Isawampersand)
-#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 start_env              (curinterp->Istart_env)
-#define statcache              (curinterp->Istatcache)
-#define statgv                 (curinterp->Istatgv)
-#define statname               (curinterp->Istatname)
-#define statusvalue            (curinterp->Istatusvalue)
-#define statusvalue_vms                (curinterp->Istatusvalue_vms)
-#define stdingv                        (curinterp->Istdingv)
-#define strchop                        (curinterp->Istrchop)
-#define strtab                 (curinterp->Istrtab)
-#define sv_arenaroot           (curinterp->Isv_arenaroot)
-#define sv_count               (curinterp->Isv_count)
-#define sv_objcount            (curinterp->Isv_objcount)
-#define sv_root                        (curinterp->Isv_root)
-#define tainted                        (curinterp->Itainted)
-#define tainting               (curinterp->Itainting)
-#define thrsv                  (curinterp->Ithrsv)
-#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  /* !MULTIPLICITY */
-
-#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 Idefgv                 defgv
-#define Idefoutgv              defoutgv
-#define Idefstash              defstash
-#define Idelaymagic            delaymagic
-#define Idiehook               diehook
-#define Idirty                 dirty
-#define Idlevel                        dlevel
-#define Idlmax                 dlmax
-#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 Iglobalstash           globalstash
-#define Iin_eval               in_eval
-#define Iincgv                 incgv
-#define Iinitav                        initav
-#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 Imess_sv               mess_sv
-#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 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 Iperl_destruct_level   perl_destruct_level
-#define Iperldb                        perldb
-#define Ipreambleav            preambleav
-#define Ipreambled             preambled
-#define Ipreprocess            preprocess
-#define Irestartop             restartop
-#define Irightgv               rightgv
-#define Irs                    rs
-#define Isawampersand          sawampersand
-#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 Istart_env             start_env
-#define Istatcache             statcache
-#define Istatgv                        statgv
-#define Istatname              statname
-#define Istatusvalue           statusvalue
-#define Istatusvalue_vms       statusvalue_vms
-#define Istdingv               stdingv
-#define Istrchop               strchop
-#define Istrtab                        strtab
-#define Isv_arenaroot          sv_arenaroot
-#define Isv_count              sv_count
-#define Isv_objcount           sv_objcount
-#define Isv_root               sv_root
-#define Itainted               tainted
-#define Itainting              tainting
-#define Ithrsv                 thrsv
-#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
-
-/* Hide interpreter-specific symbols? */
-
-#ifdef EMBED
-
-#define Argv                   Perl_Argv
-#define Cmd                    Perl_Cmd
-#define DBgv                   Perl_DBgv
-#define DBline                 Perl_DBline
-#define DBsignal               Perl_DBsignal
-#define DBsingle               Perl_DBsingle
-#define DBsub                  Perl_DBsub
-#define DBtrace                        Perl_DBtrace
-#define allgvs                 Perl_allgvs
-#define ampergv                        Perl_ampergv
-#define argvgv                 Perl_argvgv
-#define argvoutgv              Perl_argvoutgv
-#define basetime               Perl_basetime
-#define beginav                        Perl_beginav
-#define bodytarget             Perl_bodytarget
-#define cddir                  Perl_cddir
-#define chopset                        Perl_chopset
-#define copline                        Perl_copline
-#define curblock               Perl_curblock
-#define curcop                 Perl_curcop
-#define curcopdb               Perl_curcopdb
-#define curcsv                 Perl_curcsv
-#define curpm                  Perl_curpm
-#define curstack               Perl_curstack
-#define curstash               Perl_curstash
-#define curstname              Perl_curstname
-#define cxstack                        Perl_cxstack
-#define cxstack_ix             Perl_cxstack_ix
-#define cxstack_max            Perl_cxstack_max
-#define dbargs                 Perl_dbargs
-#define debdelim               Perl_debdelim
-#define debname                        Perl_debname
-#define debstash               Perl_debstash
-#define defgv                  Perl_defgv
-#define defoutgv               Perl_defoutgv
-#define defstash               Perl_defstash
-#define delaymagic             Perl_delaymagic
-#define diehook                        Perl_diehook
-#define dirty                  Perl_dirty
-#define dlevel                 Perl_dlevel
-#define dlmax                  Perl_dlmax
-#define doextract              Perl_doextract
-#define doswitches             Perl_doswitches
-#define dowarn                 Perl_dowarn
-#define dumplvl                        Perl_dumplvl
-#define e_fp                   Perl_e_fp
-#define e_tmpname              Perl_e_tmpname
-#define endav                  Perl_endav
-#define envgv                  Perl_envgv
-#define errgv                  Perl_errgv
-#define eval_root              Perl_eval_root
-#define eval_start             Perl_eval_start
-#define fdpid                  Perl_fdpid
-#define filemode               Perl_filemode
-#define firstgv                        Perl_firstgv
-#define forkprocess            Perl_forkprocess
-#define formfeed               Perl_formfeed
-#define formtarget             Perl_formtarget
-#define gensym                 Perl_gensym
-#define globalstash            Perl_globalstash
-#define in_eval                        Perl_in_eval
-#define incgv                  Perl_incgv
-#define initav                 Perl_initav
-#define inplace                        Perl_inplace
-#define last_in_gv             Perl_last_in_gv
-#define lastfd                 Perl_lastfd
-#define lastretstr             Perl_lastretstr
-#define lastscream             Perl_lastscream
-#define lastsize               Perl_lastsize
-#define lastspbase             Perl_lastspbase
-#define laststatval            Perl_laststatval
-#define laststype              Perl_laststype
-#define leftgv                 Perl_leftgv
-#define lineary                        Perl_lineary
-#define localizing             Perl_localizing
-#define localpatches           Perl_localpatches
-#define main_cv                        Perl_main_cv
-#define main_root              Perl_main_root
-#define main_start             Perl_main_start
-#define mainstack              Perl_mainstack
-#define maxscream              Perl_maxscream
-#define maxsysfd               Perl_maxsysfd
-#define mess_sv                        Perl_mess_sv
-#define minus_F                        Perl_minus_F
-#define minus_a                        Perl_minus_a
-#define minus_c                        Perl_minus_c
-#define minus_l                        Perl_minus_l
-#define minus_n                        Perl_minus_n
-#define minus_p                        Perl_minus_p
-#define multiline              Perl_multiline
-#define mystrk                 Perl_mystrk
-#define nrs                    Perl_nrs
-#define ofmt                   Perl_ofmt
-#define ofs                    Perl_ofs
-#define ofslen                 Perl_ofslen
-#define oldlastpm              Perl_oldlastpm
-#define oldname                        Perl_oldname
-#define op_mask                        Perl_op_mask
-#define origargc               Perl_origargc
-#define origargv               Perl_origargv
-#define origfilename           Perl_origfilename
-#define ors                    Perl_ors
-#define orslen                 Perl_orslen
-#define parsehook              Perl_parsehook
-#define patchlevel             Perl_patchlevel
-#define perl_destruct_level    Perl_perl_destruct_level
-#define perldb                 Perl_perldb
-#define preambleav             Perl_preambleav
-#define preambled              Perl_preambled
-#define preprocess             Perl_preprocess
-#define restartop              Perl_restartop
-#define rightgv                        Perl_rightgv
-#define rs                     Perl_rs
-#define sawampersand           Perl_sawampersand
-#define sawstudy               Perl_sawstudy
-#define sawvec                 Perl_sawvec
-#define screamfirst            Perl_screamfirst
-#define screamnext             Perl_screamnext
-#define secondgv               Perl_secondgv
-#define siggv                  Perl_siggv
-#define signalstack            Perl_signalstack
-#define sortcop                        Perl_sortcop
-#define sortstack              Perl_sortstack
-#define sortstash              Perl_sortstash
-#define splitstr               Perl_splitstr
-#define start_env              Perl_start_env
-#define statcache              Perl_statcache
-#define statgv                 Perl_statgv
-#define statname               Perl_statname
-#define statusvalue            Perl_statusvalue
-#define statusvalue_vms                Perl_statusvalue_vms
-#define stdingv                        Perl_stdingv
-#define strchop                        Perl_strchop
-#define strtab                 Perl_strtab
-#define sv_arenaroot           Perl_sv_arenaroot
-#define sv_count               Perl_sv_count
-#define sv_objcount            Perl_sv_objcount
-#define sv_root                        Perl_sv_root
-#define tainted                        Perl_tainted
-#define tainting               Perl_tainting
-#define thrsv                  Perl_thrsv
-#define tmps_floor             Perl_tmps_floor
-#define tmps_ix                        Perl_tmps_ix
-#define tmps_max               Perl_tmps_max
-#define tmps_stack             Perl_tmps_stack
-#define top_env                        Perl_top_env
-#define toptarget              Perl_toptarget
-#define unsafe                 Perl_unsafe
-#define warnhook               Perl_warnhook
-
-#endif /* EMBED */
-#endif /* MULTIPLICITY */