X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embedvar.h;h=4870703e05029fcbbf0bd5168a95d95dab0185af;hb=e91177edb0beae74fd07fb1ec08a528ab1fb63c2;hp=b68624ab69619c233ebf08439bfd06b026679bf7;hpb=d4cce5f1785350c29a181d4bbaaa3141c6fdbe1e;p=p5sagit%2Fp5-mst-13.2.git diff --git a/embedvar.h b/embedvar.h index b68624a..4870703 100644 --- a/embedvar.h +++ b/embedvar.h @@ -22,21 +22,22 @@ #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) @@ -87,11 +90,15 @@ #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) @@ -107,24 +114,30 @@ #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) @@ -132,6 +145,7 @@ #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) @@ -145,6 +159,7 @@ #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) @@ -158,11 +173,42 @@ #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) @@ -170,10 +216,10 @@ #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) @@ -184,11 +230,14 @@ #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) @@ -197,6 +246,7 @@ #define IArgv Argv #define ICmd Cmd +#define IDBcv DBcv #define IDBgv DBgv #define IDBline DBline #define IDBsignal DBsignal @@ -204,11 +254,15 @@ #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 @@ -224,24 +278,30 @@ #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 @@ -249,6 +309,7 @@ #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 @@ -262,6 +323,7 @@ #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 @@ -275,11 +337,42 @@ #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 @@ -287,10 +380,10 @@ #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 @@ -301,11 +394,14 @@ #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 @@ -314,21 +410,22 @@ #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 @@ -336,6 +433,7 @@ #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 @@ -374,6 +472,7 @@ #define Argv Perl_Argv #define Cmd Perl_Cmd +#define DBcv Perl_DBcv #define DBgv Perl_DBgv #define DBline Perl_DBline #define DBsignal Perl_DBsignal @@ -381,11 +480,15 @@ #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 @@ -401,24 +504,30 @@ #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 @@ -426,6 +535,7 @@ #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 @@ -439,6 +549,7 @@ #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 @@ -452,11 +563,42 @@ #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 @@ -464,10 +606,10 @@ #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 @@ -478,11 +620,14 @@ #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 @@ -491,21 +636,22 @@ #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 @@ -513,6 +659,7 @@ #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 @@ -553,21 +700,22 @@ #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) @@ -575,6 +723,7 @@ #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) @@ -607,3 +756,366 @@ #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 */ +