applied patch, with indentation tweaks
[p5sagit/p5-mst-13.2.git] / embedvar.h
index b68624a..4870703 100644 (file)
 
 #define Sv                     (curinterp->TSv)
 #define Xpv                    (curinterp->TXpv)
+#define av_fetch_sv            (curinterp->Tav_fetch_sv)
 #define bodytarget             (curinterp->Tbodytarget)
 #define chopset                        (curinterp->Tchopset)
 #define curcop                 (curinterp->Tcurcop)
 #define curpad                 (curinterp->Tcurpad)
 #define curpm                  (curinterp->Tcurpm)
 #define curstack               (curinterp->Tcurstack)
+#define curstackinfo           (curinterp->Tcurstackinfo)
 #define curstash               (curinterp->Tcurstash)
-#define cxstack                        (curinterp->Tcxstack)
-#define cxstack_ix             (curinterp->Tcxstack_ix)
-#define cxstack_max            (curinterp->Tcxstack_max)
 #define defoutgv               (curinterp->Tdefoutgv)
 #define defstash               (curinterp->Tdefstash)
 #define delaymagic             (curinterp->Tdelaymagic)
 #define dirty                  (curinterp->Tdirty)
 #define formtarget             (curinterp->Tformtarget)
+#define hv_fetch_ent_mh                (curinterp->Thv_fetch_ent_mh)
+#define hv_fetch_sv            (curinterp->Thv_fetch_sv)
 #define in_eval                        (curinterp->Tin_eval)
 #define last_in_gv             (curinterp->Tlast_in_gv)
 #define localizing             (curinterp->Tlocalizing)
@@ -44,6 +45,7 @@
 #define markstack              (curinterp->Tmarkstack)
 #define markstack_max          (curinterp->Tmarkstack_max)
 #define markstack_ptr          (curinterp->Tmarkstack_ptr)
+#define modcount               (curinterp->Tmodcount)
 #define nrs                    (curinterp->Tnrs)
 #define ofs                    (curinterp->Tofs)
 #define ofslen                 (curinterp->Tofslen)
@@ -80,6 +82,7 @@
 
 #define Argv                   (curinterp->IArgv)
 #define Cmd                    (curinterp->ICmd)
+#define DBcv                   (curinterp->IDBcv)
 #define DBgv                   (curinterp->IDBgv)
 #define DBline                 (curinterp->IDBline)
 #define DBsignal               (curinterp->IDBsignal)
 #define DBsub                  (curinterp->IDBsub)
 #define DBtrace                        (curinterp->IDBtrace)
 #define ampergv                        (curinterp->Iampergv)
+#define archpat_auto           (curinterp->Iarchpat_auto)
 #define argvgv                 (curinterp->Iargvgv)
 #define argvoutgv              (curinterp->Iargvoutgv)
 #define basetime               (curinterp->Ibasetime)
 #define beginav                        (curinterp->Ibeginav)
+#define bostr                  (curinterp->Ibostr)
 #define cddir                  (curinterp->Icddir)
+#define colors                 (curinterp->Icolors)
+#define colorset               (curinterp->Icolorset)
 #define copline                        (curinterp->Icopline)
 #define curcopdb               (curinterp->Icurcopdb)
 #define curstname              (curinterp->Icurstname)
 #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 e_script               (curinterp->Ie_script)
 #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 exitlist               (curinterp->Iexitlist)
+#define exitlistlen            (curinterp->Iexitlistlen)
+#define extralen               (curinterp->Iextralen)
 #define fdpid                  (curinterp->Ifdpid)
 #define filemode               (curinterp->Ifilemode)
 #define firstgv                        (curinterp->Ifirstgv)
 #define forkprocess            (curinterp->Iforkprocess)
 #define formfeed               (curinterp->Iformfeed)
+#define generation             (curinterp->Igeneration)
 #define gensym                 (curinterp->Igensym)
 #define globalstash            (curinterp->Iglobalstash)
+#define in_clean_all           (curinterp->Iin_clean_all)
+#define in_clean_objs          (curinterp->Iin_clean_objs)
 #define incgv                  (curinterp->Iincgv)
 #define initav                 (curinterp->Iinitav)
 #define inplace                        (curinterp->Iinplace)
 #define lastfd                 (curinterp->Ilastfd)
+#define lastgotoprobe          (curinterp->Ilastgotoprobe)
 #define lastscream             (curinterp->Ilastscream)
 #define lastsize               (curinterp->Ilastsize)
 #define lastspbase             (curinterp->Ilastspbase)
 #define laststype              (curinterp->Ilaststype)
 #define leftgv                 (curinterp->Ileftgv)
 #define lineary                        (curinterp->Ilineary)
+#define linestart              (curinterp->Ilinestart)
 #define localpatches           (curinterp->Ilocalpatches)
 #define main_cv                        (curinterp->Imain_cv)
 #define main_root              (curinterp->Imain_root)
 #define minus_l                        (curinterp->Iminus_l)
 #define minus_n                        (curinterp->Iminus_n)
 #define minus_p                        (curinterp->Iminus_p)
+#define modglobal              (curinterp->Imodglobal)
 #define multiline              (curinterp->Imultiline)
 #define mystrk                 (curinterp->Imystrk)
 #define ofmt                   (curinterp->Iofmt)
 #define orslen                 (curinterp->Iorslen)
 #define parsehook              (curinterp->Iparsehook)
 #define patchlevel             (curinterp->Ipatchlevel)
+#define pending_ident          (curinterp->Ipending_ident)
 #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 reg_eval_set           (curinterp->Ireg_eval_set)
+#define reg_flags              (curinterp->Ireg_flags)
+#define reg_start_tmp          (curinterp->Ireg_start_tmp)
+#define reg_start_tmpl         (curinterp->Ireg_start_tmpl)
+#define regbol                 (curinterp->Iregbol)
+#define regcc                  (curinterp->Iregcc)
+#define regcode                        (curinterp->Iregcode)
+#define regcomp_parse          (curinterp->Iregcomp_parse)
+#define regcomp_rx             (curinterp->Iregcomp_rx)
+#define regdata                        (curinterp->Iregdata)
+#define regdummy               (curinterp->Iregdummy)
+#define regendp                        (curinterp->Iregendp)
+#define regeol                 (curinterp->Iregeol)
+#define regflags               (curinterp->Iregflags)
+#define regindent              (curinterp->Iregindent)
+#define reginput               (curinterp->Ireginput)
+#define reglastparen           (curinterp->Ireglastparen)
+#define regnarrate             (curinterp->Iregnarrate)
+#define regnaughty             (curinterp->Iregnaughty)
+#define regnpar                        (curinterp->Iregnpar)
+#define regprecomp             (curinterp->Iregprecomp)
+#define regprev                        (curinterp->Iregprev)
+#define regprogram             (curinterp->Iregprogram)
+#define regsawback             (curinterp->Iregsawback)
+#define regseen                        (curinterp->Iregseen)
+#define regsize                        (curinterp->Iregsize)
+#define regstartp              (curinterp->Iregstartp)
+#define regtill                        (curinterp->Iregtill)
+#define regxend                        (curinterp->Iregxend)
+#define replgv                 (curinterp->Ireplgv)
 #define rightgv                        (curinterp->Irightgv)
 #define sawampersand           (curinterp->Isawampersand)
 #define sawstudy               (curinterp->Isawstudy)
 #define screamfirst            (curinterp->Iscreamfirst)
 #define screamnext             (curinterp->Iscreamnext)
 #define secondgv               (curinterp->Isecondgv)
+#define seen_zerolen           (curinterp->Iseen_zerolen)
 #define siggv                  (curinterp->Isiggv)
-#define signalstack            (curinterp->Isignalstack)
 #define sortcop                        (curinterp->Isortcop)
-#define sortstack              (curinterp->Isortstack)
+#define sortcxix               (curinterp->Isortcxix)
 #define sortstash              (curinterp->Isortstash)
 #define splitstr               (curinterp->Isplitstr)
 #define statcache              (curinterp->Istatcache)
 #define stdingv                        (curinterp->Istdingv)
 #define strchop                        (curinterp->Istrchop)
 #define strtab                 (curinterp->Istrtab)
+#define sublex_info            (curinterp->Isublex_info)
 #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 sys_intern             (curinterp->Isys_intern)
 #define tainting               (curinterp->Itainting)
+#define threadnum              (curinterp->Ithreadnum)
 #define thrsv                  (curinterp->Ithrsv)
 #define unsafe                 (curinterp->Iunsafe)
 #define warnhook               (curinterp->Iwarnhook)
 
 #define IArgv                  Argv
 #define ICmd                   Cmd
+#define IDBcv                  DBcv
 #define IDBgv                  DBgv
 #define IDBline                        DBline
 #define IDBsignal              DBsignal
 #define IDBsub                 DBsub
 #define IDBtrace               DBtrace
 #define Iampergv               ampergv
+#define Iarchpat_auto          archpat_auto
 #define Iargvgv                        argvgv
 #define Iargvoutgv             argvoutgv
 #define Ibasetime              basetime
 #define Ibeginav               beginav
+#define Ibostr                 bostr
 #define Icddir                 cddir
+#define Icolors                        colors
+#define Icolorset              colorset
 #define Icopline               copline
 #define Icurcopdb              curcopdb
 #define Icurstname             curstname
 #define Idoswitches            doswitches
 #define Idowarn                        dowarn
 #define Idumplvl               dumplvl
-#define Ie_fp                  e_fp
-#define Ie_tmpname             e_tmpname
+#define Ie_script              e_script
 #define Iendav                 endav
 #define Ienvgv                 envgv
 #define Ierrgv                 errgv
 #define Ieval_root             eval_root
 #define Ieval_start            eval_start
+#define Iexitlist              exitlist
+#define Iexitlistlen           exitlistlen
+#define Iextralen              extralen
 #define Ifdpid                 fdpid
 #define Ifilemode              filemode
 #define Ifirstgv               firstgv
 #define Iforkprocess           forkprocess
 #define Iformfeed              formfeed
+#define Igeneration            generation
 #define Igensym                        gensym
 #define Iglobalstash           globalstash
+#define Iin_clean_all          in_clean_all
+#define Iin_clean_objs         in_clean_objs
 #define Iincgv                 incgv
 #define Iinitav                        initav
 #define Iinplace               inplace
 #define Ilastfd                        lastfd
+#define Ilastgotoprobe         lastgotoprobe
 #define Ilastscream            lastscream
 #define Ilastsize              lastsize
 #define Ilastspbase            lastspbase
 #define Ilaststype             laststype
 #define Ileftgv                        leftgv
 #define Ilineary               lineary
+#define Ilinestart             linestart
 #define Ilocalpatches          localpatches
 #define Imain_cv               main_cv
 #define Imain_root             main_root
 #define Iminus_l               minus_l
 #define Iminus_n               minus_n
 #define Iminus_p               minus_p
+#define Imodglobal             modglobal
 #define Imultiline             multiline
 #define Imystrk                        mystrk
 #define Iofmt                  ofmt
 #define Iorslen                        orslen
 #define Iparsehook             parsehook
 #define Ipatchlevel            patchlevel
+#define Ipending_ident         pending_ident
 #define Iperl_destruct_level   perl_destruct_level
 #define Iperldb                        perldb
 #define Ipreambleav            preambleav
 #define Ipreambled             preambled
 #define Ipreprocess            preprocess
+#define Ireg_eval_set          reg_eval_set
+#define Ireg_flags             reg_flags
+#define Ireg_start_tmp         reg_start_tmp
+#define Ireg_start_tmpl                reg_start_tmpl
+#define Iregbol                        regbol
+#define Iregcc                 regcc
+#define Iregcode               regcode
+#define Iregcomp_parse         regcomp_parse
+#define Iregcomp_rx            regcomp_rx
+#define Iregdata               regdata
+#define Iregdummy              regdummy
+#define Iregendp               regendp
+#define Iregeol                        regeol
+#define Iregflags              regflags
+#define Iregindent             regindent
+#define Ireginput              reginput
+#define Ireglastparen          reglastparen
+#define Iregnarrate            regnarrate
+#define Iregnaughty            regnaughty
+#define Iregnpar               regnpar
+#define Iregprecomp            regprecomp
+#define Iregprev               regprev
+#define Iregprogram            regprogram
+#define Iregsawback            regsawback
+#define Iregseen               regseen
+#define Iregsize               regsize
+#define Iregstartp             regstartp
+#define Iregtill               regtill
+#define Iregxend               regxend
+#define Ireplgv                        replgv
 #define Irightgv               rightgv
 #define Isawampersand          sawampersand
 #define Isawstudy              sawstudy
 #define Iscreamfirst           screamfirst
 #define Iscreamnext            screamnext
 #define Isecondgv              secondgv
+#define Iseen_zerolen          seen_zerolen
 #define Isiggv                 siggv
-#define Isignalstack           signalstack
 #define Isortcop               sortcop
-#define Isortstack             sortstack
+#define Isortcxix              sortcxix
 #define Isortstash             sortstash
 #define Isplitstr              splitstr
 #define Istatcache             statcache
 #define Istdingv               stdingv
 #define Istrchop               strchop
 #define Istrtab                        strtab
+#define Isublex_info           sublex_info
 #define Isv_arenaroot          sv_arenaroot
 #define Isv_count              sv_count
 #define Isv_objcount           sv_objcount
 #define Isv_root               sv_root
+#define Isys_intern            sys_intern
 #define Itainting              tainting
+#define Ithreadnum             threadnum
 #define Ithrsv                 thrsv
 #define Iunsafe                        unsafe
 #define Iwarnhook              warnhook
 
 #define TSv                    Sv
 #define TXpv                   Xpv
+#define Tav_fetch_sv           av_fetch_sv
 #define Tbodytarget            bodytarget
 #define Tchopset               chopset
 #define Tcurcop                        curcop
 #define Tcurpad                        curpad
 #define Tcurpm                 curpm
 #define Tcurstack              curstack
+#define Tcurstackinfo          curstackinfo
 #define Tcurstash              curstash
-#define Tcxstack               cxstack
-#define Tcxstack_ix            cxstack_ix
-#define Tcxstack_max           cxstack_max
 #define Tdefoutgv              defoutgv
 #define Tdefstash              defstash
 #define Tdelaymagic            delaymagic
 #define Tdirty                 dirty
 #define Tformtarget            formtarget
+#define Thv_fetch_ent_mh       hv_fetch_ent_mh
+#define Thv_fetch_sv           hv_fetch_sv
 #define Tin_eval               in_eval
 #define Tlast_in_gv            last_in_gv
 #define Tlocalizing            localizing
 #define Tmarkstack             markstack
 #define Tmarkstack_max         markstack_max
 #define Tmarkstack_ptr         markstack_ptr
+#define Tmodcount              modcount
 #define Tnrs                   nrs
 #define Tofs                   ofs
 #define Tofslen                        ofslen
 
 #define Argv                   Perl_Argv
 #define Cmd                    Perl_Cmd
+#define DBcv                   Perl_DBcv
 #define DBgv                   Perl_DBgv
 #define DBline                 Perl_DBline
 #define DBsignal               Perl_DBsignal
 #define DBsub                  Perl_DBsub
 #define DBtrace                        Perl_DBtrace
 #define ampergv                        Perl_ampergv
+#define archpat_auto           Perl_archpat_auto
 #define argvgv                 Perl_argvgv
 #define argvoutgv              Perl_argvoutgv
 #define basetime               Perl_basetime
 #define beginav                        Perl_beginav
+#define bostr                  Perl_bostr
 #define cddir                  Perl_cddir
+#define colors                 Perl_colors
+#define colorset               Perl_colorset
 #define copline                        Perl_copline
 #define curcopdb               Perl_curcopdb
 #define curstname              Perl_curstname
 #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 e_script               Perl_e_script
 #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 exitlist               Perl_exitlist
+#define exitlistlen            Perl_exitlistlen
+#define extralen               Perl_extralen
 #define fdpid                  Perl_fdpid
 #define filemode               Perl_filemode
 #define firstgv                        Perl_firstgv
 #define forkprocess            Perl_forkprocess
 #define formfeed               Perl_formfeed
+#define generation             Perl_generation
 #define gensym                 Perl_gensym
 #define globalstash            Perl_globalstash
+#define in_clean_all           Perl_in_clean_all
+#define in_clean_objs          Perl_in_clean_objs
 #define incgv                  Perl_incgv
 #define initav                 Perl_initav
 #define inplace                        Perl_inplace
 #define lastfd                 Perl_lastfd
+#define lastgotoprobe          Perl_lastgotoprobe
 #define lastscream             Perl_lastscream
 #define lastsize               Perl_lastsize
 #define lastspbase             Perl_lastspbase
 #define laststype              Perl_laststype
 #define leftgv                 Perl_leftgv
 #define lineary                        Perl_lineary
+#define linestart              Perl_linestart
 #define localpatches           Perl_localpatches
 #define main_cv                        Perl_main_cv
 #define main_root              Perl_main_root
 #define minus_l                        Perl_minus_l
 #define minus_n                        Perl_minus_n
 #define minus_p                        Perl_minus_p
+#define modglobal              Perl_modglobal
 #define multiline              Perl_multiline
 #define mystrk                 Perl_mystrk
 #define ofmt                   Perl_ofmt
 #define orslen                 Perl_orslen
 #define parsehook              Perl_parsehook
 #define patchlevel             Perl_patchlevel
+#define pending_ident          Perl_pending_ident
 #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 reg_eval_set           Perl_reg_eval_set
+#define reg_flags              Perl_reg_flags
+#define reg_start_tmp          Perl_reg_start_tmp
+#define reg_start_tmpl         Perl_reg_start_tmpl
+#define regbol                 Perl_regbol
+#define regcc                  Perl_regcc
+#define regcode                        Perl_regcode
+#define regcomp_parse          Perl_regcomp_parse
+#define regcomp_rx             Perl_regcomp_rx
+#define regdata                        Perl_regdata
+#define regdummy               Perl_regdummy
+#define regendp                        Perl_regendp
+#define regeol                 Perl_regeol
+#define regflags               Perl_regflags
+#define regindent              Perl_regindent
+#define reginput               Perl_reginput
+#define reglastparen           Perl_reglastparen
+#define regnarrate             Perl_regnarrate
+#define regnaughty             Perl_regnaughty
+#define regnpar                        Perl_regnpar
+#define regprecomp             Perl_regprecomp
+#define regprev                        Perl_regprev
+#define regprogram             Perl_regprogram
+#define regsawback             Perl_regsawback
+#define regseen                        Perl_regseen
+#define regsize                        Perl_regsize
+#define regstartp              Perl_regstartp
+#define regtill                        Perl_regtill
+#define regxend                        Perl_regxend
+#define replgv                 Perl_replgv
 #define rightgv                        Perl_rightgv
 #define sawampersand           Perl_sawampersand
 #define sawstudy               Perl_sawstudy
 #define screamfirst            Perl_screamfirst
 #define screamnext             Perl_screamnext
 #define secondgv               Perl_secondgv
+#define seen_zerolen           Perl_seen_zerolen
 #define siggv                  Perl_siggv
-#define signalstack            Perl_signalstack
 #define sortcop                        Perl_sortcop
-#define sortstack              Perl_sortstack
+#define sortcxix               Perl_sortcxix
 #define sortstash              Perl_sortstash
 #define splitstr               Perl_splitstr
 #define statcache              Perl_statcache
 #define stdingv                        Perl_stdingv
 #define strchop                        Perl_strchop
 #define strtab                 Perl_strtab
+#define sublex_info            Perl_sublex_info
 #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 sys_intern             Perl_sys_intern
 #define tainting               Perl_tainting
+#define threadnum              Perl_threadnum
 #define thrsv                  Perl_thrsv
 #define unsafe                 Perl_unsafe
 #define warnhook               Perl_warnhook
 
 #define Sv                     Perl_Sv
 #define Xpv                    Perl_Xpv
+#define av_fetch_sv            Perl_av_fetch_sv
 #define bodytarget             Perl_bodytarget
 #define chopset                        Perl_chopset
 #define curcop                 Perl_curcop
 #define curpad                 Perl_curpad
 #define curpm                  Perl_curpm
 #define curstack               Perl_curstack
+#define curstackinfo           Perl_curstackinfo
 #define curstash               Perl_curstash
-#define cxstack                        Perl_cxstack
-#define cxstack_ix             Perl_cxstack_ix
-#define cxstack_max            Perl_cxstack_max
 #define defoutgv               Perl_defoutgv
 #define defstash               Perl_defstash
 #define delaymagic             Perl_delaymagic
 #define dirty                  Perl_dirty
 #define formtarget             Perl_formtarget
+#define hv_fetch_ent_mh                Perl_hv_fetch_ent_mh
+#define hv_fetch_sv            Perl_hv_fetch_sv
 #define in_eval                        Perl_in_eval
 #define last_in_gv             Perl_last_in_gv
 #define localizing             Perl_localizing
 #define markstack              Perl_markstack
 #define markstack_max          Perl_markstack_max
 #define markstack_ptr          Perl_markstack_ptr
+#define modcount               Perl_modcount
 #define nrs                    Perl_nrs
 #define ofs                    Perl_ofs
 #define ofslen                 Perl_ofslen
 
 #define Sv                     (thr->TSv)
 #define Xpv                    (thr->TXpv)
+#define av_fetch_sv            (thr->Tav_fetch_sv)
 #define bodytarget             (thr->Tbodytarget)
 #define chopset                        (thr->Tchopset)
 #define curcop                 (thr->Tcurcop)
 #define curpad                 (thr->Tcurpad)
 #define curpm                  (thr->Tcurpm)
 #define curstack               (thr->Tcurstack)
+#define curstackinfo           (thr->Tcurstackinfo)
 #define curstash               (thr->Tcurstash)
-#define cxstack                        (thr->Tcxstack)
-#define cxstack_ix             (thr->Tcxstack_ix)
-#define cxstack_max            (thr->Tcxstack_max)
 #define defoutgv               (thr->Tdefoutgv)
 #define defstash               (thr->Tdefstash)
 #define delaymagic             (thr->Tdelaymagic)
 #define dirty                  (thr->Tdirty)
 #define formtarget             (thr->Tformtarget)
+#define hv_fetch_ent_mh                (thr->Thv_fetch_ent_mh)
+#define hv_fetch_sv            (thr->Thv_fetch_sv)
 #define in_eval                        (thr->Tin_eval)
 #define last_in_gv             (thr->Tlast_in_gv)
 #define localizing             (thr->Tlocalizing)
 #define markstack              (thr->Tmarkstack)
 #define markstack_max          (thr->Tmarkstack_max)
 #define markstack_ptr          (thr->Tmarkstack_ptr)
+#define modcount               (thr->Tmodcount)
 #define nrs                    (thr->Tnrs)
 #define ofs                    (thr->Tofs)
 #define ofslen                 (thr->Tofslen)
 
 #endif /* USE_THREADS */
 
+#ifdef PERL_GLOBAL_STRUCT
+
+#define No                     (Perl_Vars.GNo)
+#define Yes                    (Perl_Vars.GYes)
+#define amagic_generation      (Perl_Vars.Gamagic_generation)
+#define an                     (Perl_Vars.Gan)
+#define bufend                 (Perl_Vars.Gbufend)
+#define bufptr                 (Perl_Vars.Gbufptr)
+#define collation_ix           (Perl_Vars.Gcollation_ix)
+#define collation_name         (Perl_Vars.Gcollation_name)
+#define collation_standard     (Perl_Vars.Gcollation_standard)
+#define collxfrm_base          (Perl_Vars.Gcollxfrm_base)
+#define collxfrm_mult          (Perl_Vars.Gcollxfrm_mult)
+#define compcv                 (Perl_Vars.Gcompcv)
+#define compiling              (Perl_Vars.Gcompiling)
+#define comppad                        (Perl_Vars.Gcomppad)
+#define comppad_name           (Perl_Vars.Gcomppad_name)
+#define comppad_name_fill      (Perl_Vars.Gcomppad_name_fill)
+#define comppad_name_floor     (Perl_Vars.Gcomppad_name_floor)
+#define cop_seqmax             (Perl_Vars.Gcop_seqmax)
+#define cryptseen              (Perl_Vars.Gcryptseen)
+#define cshlen                 (Perl_Vars.Gcshlen)
+#define cshname                        (Perl_Vars.Gcshname)
+#define curinterp              (Perl_Vars.Gcurinterp)
+#define curthr                 (Perl_Vars.Gcurthr)
+#define debug                  (Perl_Vars.Gdebug)
+#define do_undump              (Perl_Vars.Gdo_undump)
+#define egid                   (Perl_Vars.Gegid)
+#define error_count            (Perl_Vars.Gerror_count)
+#define euid                   (Perl_Vars.Geuid)
+#define eval_cond              (Perl_Vars.Geval_cond)
+#define eval_mutex             (Perl_Vars.Geval_mutex)
+#define eval_owner             (Perl_Vars.Geval_owner)
+#define evalseq                        (Perl_Vars.Gevalseq)
+#define expect                 (Perl_Vars.Gexpect)
+#define gid                    (Perl_Vars.Ggid)
+#define he_root                        (Perl_Vars.Ghe_root)
+#define hexdigit               (Perl_Vars.Ghexdigit)
+#define hints                  (Perl_Vars.Ghints)
+#define in_my                  (Perl_Vars.Gin_my)
+#define in_my_stash            (Perl_Vars.Gin_my_stash)
+#define last_lop               (Perl_Vars.Glast_lop)
+#define last_lop_op            (Perl_Vars.Glast_lop_op)
+#define last_uni               (Perl_Vars.Glast_uni)
+#define lex_brackets           (Perl_Vars.Glex_brackets)
+#define lex_brackstack         (Perl_Vars.Glex_brackstack)
+#define lex_casemods           (Perl_Vars.Glex_casemods)
+#define lex_casestack          (Perl_Vars.Glex_casestack)
+#define lex_defer              (Perl_Vars.Glex_defer)
+#define lex_dojoin             (Perl_Vars.Glex_dojoin)
+#define lex_expect             (Perl_Vars.Glex_expect)
+#define lex_fakebrack          (Perl_Vars.Glex_fakebrack)
+#define lex_formbrack          (Perl_Vars.Glex_formbrack)
+#define lex_inpat              (Perl_Vars.Glex_inpat)
+#define lex_inwhat             (Perl_Vars.Glex_inwhat)
+#define lex_op                 (Perl_Vars.Glex_op)
+#define lex_repl               (Perl_Vars.Glex_repl)
+#define lex_starts             (Perl_Vars.Glex_starts)
+#define lex_state              (Perl_Vars.Glex_state)
+#define lex_stuff              (Perl_Vars.Glex_stuff)
+#define linestr                        (Perl_Vars.Glinestr)
+#define malloc_mutex           (Perl_Vars.Gmalloc_mutex)
+#define max_intro_pending      (Perl_Vars.Gmax_intro_pending)
+#define maxo                   (Perl_Vars.Gmaxo)
+#define min_intro_pending      (Perl_Vars.Gmin_intro_pending)
+#define multi_close            (Perl_Vars.Gmulti_close)
+#define multi_end              (Perl_Vars.Gmulti_end)
+#define multi_open             (Perl_Vars.Gmulti_open)
+#define multi_start            (Perl_Vars.Gmulti_start)
+#define na                     (Perl_Vars.Gna)
+#define nexttoke               (Perl_Vars.Gnexttoke)
+#define nexttype               (Perl_Vars.Gnexttype)
+#define nextval                        (Perl_Vars.Gnextval)
+#define nice_chunk             (Perl_Vars.Gnice_chunk)
+#define nice_chunk_size                (Perl_Vars.Gnice_chunk_size)
+#define nomemok                        (Perl_Vars.Gnomemok)
+#define nthreads               (Perl_Vars.Gnthreads)
+#define nthreads_cond          (Perl_Vars.Gnthreads_cond)
+#define numeric_local          (Perl_Vars.Gnumeric_local)
+#define numeric_name           (Perl_Vars.Gnumeric_name)
+#define numeric_standard       (Perl_Vars.Gnumeric_standard)
+#define oldbufptr              (Perl_Vars.Goldbufptr)
+#define oldoldbufptr           (Perl_Vars.Goldoldbufptr)
+#define op_seqmax              (Perl_Vars.Gop_seqmax)
+#define origalen               (Perl_Vars.Gorigalen)
+#define origenviron            (Perl_Vars.Gorigenviron)
+#define osname                 (Perl_Vars.Gosname)
+#define pad_reset_pending      (Perl_Vars.Gpad_reset_pending)
+#define padix                  (Perl_Vars.Gpadix)
+#define padix_floor            (Perl_Vars.Gpadix_floor)
+#define patleave               (Perl_Vars.Gpatleave)
+#define pidstatus              (Perl_Vars.Gpidstatus)
+#define profiledata            (Perl_Vars.Gprofiledata)
+#define rsfp                   (Perl_Vars.Grsfp)
+#define rsfp_filters           (Perl_Vars.Grsfp_filters)
+#define runops                 (Perl_Vars.Grunops)
+#define scrgv                  (Perl_Vars.Gscrgv)
+#define sh_path                        (Perl_Vars.Gsh_path)
+#define sighandlerp            (Perl_Vars.Gsighandlerp)
+#define specialsv_list         (Perl_Vars.Gspecialsv_list)
+#define sub_generation         (Perl_Vars.Gsub_generation)
+#define subline                        (Perl_Vars.Gsubline)
+#define subname                        (Perl_Vars.Gsubname)
+#define sv_mutex               (Perl_Vars.Gsv_mutex)
+#define sv_no                  (Perl_Vars.Gsv_no)
+#define sv_undef               (Perl_Vars.Gsv_undef)
+#define sv_yes                 (Perl_Vars.Gsv_yes)
+#define svref_mutex            (Perl_Vars.Gsvref_mutex)
+#define thisexpr               (Perl_Vars.Gthisexpr)
+#define thr_key                        (Perl_Vars.Gthr_key)
+#define threads_mutex          (Perl_Vars.Gthreads_mutex)
+#define threadsv_names         (Perl_Vars.Gthreadsv_names)
+#define tokenbuf               (Perl_Vars.Gtokenbuf)
+#define uid                    (Perl_Vars.Guid)
+#define xiv_arenaroot          (Perl_Vars.Gxiv_arenaroot)
+#define xiv_root               (Perl_Vars.Gxiv_root)
+#define xnv_root               (Perl_Vars.Gxnv_root)
+#define xpv_root               (Perl_Vars.Gxpv_root)
+#define xrv_root               (Perl_Vars.Gxrv_root)
+
+#else /* !PERL_GLOBAL_STRUCT */
+
+#define GNo                    No
+#define GYes                   Yes
+#define Gamagic_generation     amagic_generation
+#define Gan                    an
+#define Gbufend                        bufend
+#define Gbufptr                        bufptr
+#define Gcollation_ix          collation_ix
+#define Gcollation_name                collation_name
+#define Gcollation_standard    collation_standard
+#define Gcollxfrm_base         collxfrm_base
+#define Gcollxfrm_mult         collxfrm_mult
+#define Gcompcv                        compcv
+#define Gcompiling             compiling
+#define Gcomppad               comppad
+#define Gcomppad_name          comppad_name
+#define Gcomppad_name_fill     comppad_name_fill
+#define Gcomppad_name_floor    comppad_name_floor
+#define Gcop_seqmax            cop_seqmax
+#define Gcryptseen             cryptseen
+#define Gcshlen                        cshlen
+#define Gcshname               cshname
+#define Gcurinterp             curinterp
+#define Gcurthr                        curthr
+#define Gdebug                 debug
+#define Gdo_undump             do_undump
+#define Gegid                  egid
+#define Gerror_count           error_count
+#define Geuid                  euid
+#define Geval_cond             eval_cond
+#define Geval_mutex            eval_mutex
+#define Geval_owner            eval_owner
+#define Gevalseq               evalseq
+#define Gexpect                        expect
+#define Ggid                   gid
+#define Ghe_root               he_root
+#define Ghexdigit              hexdigit
+#define Ghints                 hints
+#define Gin_my                 in_my
+#define Gin_my_stash           in_my_stash
+#define Glast_lop              last_lop
+#define Glast_lop_op           last_lop_op
+#define Glast_uni              last_uni
+#define Glex_brackets          lex_brackets
+#define Glex_brackstack                lex_brackstack
+#define Glex_casemods          lex_casemods
+#define Glex_casestack         lex_casestack
+#define Glex_defer             lex_defer
+#define Glex_dojoin            lex_dojoin
+#define Glex_expect            lex_expect
+#define Glex_fakebrack         lex_fakebrack
+#define Glex_formbrack         lex_formbrack
+#define Glex_inpat             lex_inpat
+#define Glex_inwhat            lex_inwhat
+#define Glex_op                        lex_op
+#define Glex_repl              lex_repl
+#define Glex_starts            lex_starts
+#define Glex_state             lex_state
+#define Glex_stuff             lex_stuff
+#define Glinestr               linestr
+#define Gmalloc_mutex          malloc_mutex
+#define Gmax_intro_pending     max_intro_pending
+#define Gmaxo                  maxo
+#define Gmin_intro_pending     min_intro_pending
+#define Gmulti_close           multi_close
+#define Gmulti_end             multi_end
+#define Gmulti_open            multi_open
+#define Gmulti_start           multi_start
+#define Gna                    na
+#define Gnexttoke              nexttoke
+#define Gnexttype              nexttype
+#define Gnextval               nextval
+#define Gnice_chunk            nice_chunk
+#define Gnice_chunk_size       nice_chunk_size
+#define Gnomemok               nomemok
+#define Gnthreads              nthreads
+#define Gnthreads_cond         nthreads_cond
+#define Gnumeric_local         numeric_local
+#define Gnumeric_name          numeric_name
+#define Gnumeric_standard      numeric_standard
+#define Goldbufptr             oldbufptr
+#define Goldoldbufptr          oldoldbufptr
+#define Gop_seqmax             op_seqmax
+#define Gorigalen              origalen
+#define Gorigenviron           origenviron
+#define Gosname                        osname
+#define Gpad_reset_pending     pad_reset_pending
+#define Gpadix                 padix
+#define Gpadix_floor           padix_floor
+#define Gpatleave              patleave
+#define Gpidstatus             pidstatus
+#define Gprofiledata           profiledata
+#define Grsfp                  rsfp
+#define Grsfp_filters          rsfp_filters
+#define Grunops                        runops
+#define Gscrgv                 scrgv
+#define Gsh_path               sh_path
+#define Gsighandlerp           sighandlerp
+#define Gspecialsv_list                specialsv_list
+#define Gsub_generation                sub_generation
+#define Gsubline               subline
+#define Gsubname               subname
+#define Gsv_mutex              sv_mutex
+#define Gsv_no                 sv_no
+#define Gsv_undef              sv_undef
+#define Gsv_yes                        sv_yes
+#define Gsvref_mutex           svref_mutex
+#define Gthisexpr              thisexpr
+#define Gthr_key               thr_key
+#define Gthreads_mutex         threads_mutex
+#define Gthreadsv_names                threadsv_names
+#define Gtokenbuf              tokenbuf
+#define Guid                   uid
+#define Gxiv_arenaroot         xiv_arenaroot
+#define Gxiv_root              xiv_root
+#define Gxnv_root              xnv_root
+#define Gxpv_root              xpv_root
+#define Gxrv_root              xrv_root
+
+#ifdef EMBED
+
+#define No                     Perl_No
+#define Yes                    Perl_Yes
+#define amagic_generation      Perl_amagic_generation
+#define an                     Perl_an
+#define bufend                 Perl_bufend
+#define bufptr                 Perl_bufptr
+#define collation_ix           Perl_collation_ix
+#define collation_name         Perl_collation_name
+#define collation_standard     Perl_collation_standard
+#define collxfrm_base          Perl_collxfrm_base
+#define collxfrm_mult          Perl_collxfrm_mult
+#define compcv                 Perl_compcv
+#define compiling              Perl_compiling
+#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 cop_seqmax             Perl_cop_seqmax
+#define cryptseen              Perl_cryptseen
+#define cshlen                 Perl_cshlen
+#define cshname                        Perl_cshname
+#define curinterp              Perl_curinterp
+#define curthr                 Perl_curthr
+#define debug                  Perl_debug
+#define do_undump              Perl_do_undump
+#define egid                   Perl_egid
+#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 expect                 Perl_expect
+#define gid                    Perl_gid
+#define he_root                        Perl_he_root
+#define hexdigit               Perl_hexdigit
+#define hints                  Perl_hints
+#define in_my                  Perl_in_my
+#define in_my_stash            Perl_in_my_stash
+#define last_lop               Perl_last_lop
+#define last_lop_op            Perl_last_lop_op
+#define last_uni               Perl_last_uni
+#define lex_brackets           Perl_lex_brackets
+#define lex_brackstack         Perl_lex_brackstack
+#define lex_casemods           Perl_lex_casemods
+#define lex_casestack          Perl_lex_casestack
+#define lex_defer              Perl_lex_defer
+#define lex_dojoin             Perl_lex_dojoin
+#define lex_expect             Perl_lex_expect
+#define lex_fakebrack          Perl_lex_fakebrack
+#define lex_formbrack          Perl_lex_formbrack
+#define lex_inpat              Perl_lex_inpat
+#define lex_inwhat             Perl_lex_inwhat
+#define lex_op                 Perl_lex_op
+#define lex_repl               Perl_lex_repl
+#define lex_starts             Perl_lex_starts
+#define lex_state              Perl_lex_state
+#define lex_stuff              Perl_lex_stuff
+#define linestr                        Perl_linestr
+#define malloc_mutex           Perl_malloc_mutex
+#define max_intro_pending      Perl_max_intro_pending
+#define maxo                   Perl_maxo
+#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 nexttoke               Perl_nexttoke
+#define nexttype               Perl_nexttype
+#define nextval                        Perl_nextval
+#define nice_chunk             Perl_nice_chunk
+#define nice_chunk_size                Perl_nice_chunk_size
+#define nomemok                        Perl_nomemok
+#define nthreads               Perl_nthreads
+#define nthreads_cond          Perl_nthreads_cond
+#define numeric_local          Perl_numeric_local
+#define numeric_name           Perl_numeric_name
+#define numeric_standard       Perl_numeric_standard
+#define oldbufptr              Perl_oldbufptr
+#define oldoldbufptr           Perl_oldoldbufptr
+#define op_seqmax              Perl_op_seqmax
+#define origalen               Perl_origalen
+#define origenviron            Perl_origenviron
+#define osname                 Perl_osname
+#define pad_reset_pending      Perl_pad_reset_pending
+#define padix                  Perl_padix
+#define padix_floor            Perl_padix_floor
+#define patleave               Perl_patleave
+#define pidstatus              Perl_pidstatus
+#define profiledata            Perl_profiledata
+#define rsfp                   Perl_rsfp
+#define rsfp_filters           Perl_rsfp_filters
+#define runops                 Perl_runops
+#define scrgv                  Perl_scrgv
+#define sh_path                        Perl_sh_path
+#define sighandlerp            Perl_sighandlerp
+#define specialsv_list         Perl_specialsv_list
+#define sub_generation         Perl_sub_generation
+#define subline                        Perl_subline
+#define subname                        Perl_subname
+#define sv_mutex               Perl_sv_mutex
+#define sv_no                  Perl_sv_no
+#define sv_undef               Perl_sv_undef
+#define sv_yes                 Perl_sv_yes
+#define svref_mutex            Perl_svref_mutex
+#define thisexpr               Perl_thisexpr
+#define thr_key                        Perl_thr_key
+#define threads_mutex          Perl_threads_mutex
+#define threadsv_names         Perl_threadsv_names
+#define tokenbuf               Perl_tokenbuf
+#define uid                    Perl_uid
+#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
+
+#endif /* EMBED */
+#endif /* PERL_GLOBAL_STRUCT */
+