X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embedvar.h;h=4870703e05029fcbbf0bd5168a95d95dab0185af;hb=e91177edb0beae74fd07fb1ec08a528ab1fb63c2;hp=4e3f81630e47e19d98624d67db9572271c26b69b;hpb=fbbbcc485c1d03c76a91f998e1e4492c8ad56b38;p=p5sagit%2Fp5-mst-13.2.git diff --git a/embedvar.h b/embedvar.h index 4e3f816..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) @@ -112,13 +114,14 @@ #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) @@ -150,14 +153,13 @@ #define maxscream (curinterp->Imaxscream) #define maxsysfd (curinterp->Imaxsysfd) #define mess_sv (curinterp->Imess_sv) -#define mh (curinterp->Imh) #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 modcount (curinterp->Imodcount) +#define modglobal (curinterp->Imodglobal) #define multiline (curinterp->Imultiline) #define mystrk (curinterp->Imystrk) #define ofmt (curinterp->Iofmt) @@ -184,6 +186,8 @@ #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) @@ -195,7 +199,6 @@ #define regnarrate (curinterp->Iregnarrate) #define regnaughty (curinterp->Iregnaughty) #define regnpar (curinterp->Iregnpar) -#define regparse (curinterp->Iregparse) #define regprecomp (curinterp->Iregprecomp) #define regprev (curinterp->Iregprev) #define regprogram (curinterp->Iregprogram) @@ -205,20 +208,18 @@ #define regstartp (curinterp->Iregstartp) #define regtill (curinterp->Iregtill) #define regxend (curinterp->Iregxend) +#define replgv (curinterp->Ireplgv) #define rightgv (curinterp->Irightgv) -#define rx (curinterp->Irx) #define sawampersand (curinterp->Isawampersand) #define sawstudy (curinterp->Isawstudy) #define sawvec (curinterp->Isawvec) -#define seen_zerolen (curinterp->Iseen_zerolen) #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 sortcxix (curinterp->Isortcxix) -#define sortstack (curinterp->Isortstack) #define sortstash (curinterp->Isortstash) #define splitstr (curinterp->Isplitstr) #define statcache (curinterp->Istatcache) @@ -234,6 +235,7 @@ #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) @@ -276,13 +278,14 @@ #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 @@ -314,14 +317,13 @@ #define Imaxscream maxscream #define Imaxsysfd maxsysfd #define Imess_sv mess_sv -#define Imh mh #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 Imodcount modcount +#define Imodglobal modglobal #define Imultiline multiline #define Imystrk mystrk #define Iofmt ofmt @@ -348,6 +350,8 @@ #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 @@ -359,7 +363,6 @@ #define Iregnarrate regnarrate #define Iregnaughty regnaughty #define Iregnpar regnpar -#define Iregparse regparse #define Iregprecomp regprecomp #define Iregprev regprev #define Iregprogram regprogram @@ -369,8 +372,8 @@ #define Iregstartp regstartp #define Iregtill regtill #define Iregxend regxend +#define Ireplgv replgv #define Irightgv rightgv -#define Irx rx #define Isawampersand sawampersand #define Isawstudy sawstudy #define Isawvec sawvec @@ -379,10 +382,8 @@ #define Isecondgv secondgv #define Iseen_zerolen seen_zerolen #define Isiggv siggv -#define Isignalstack signalstack #define Isortcop sortcop #define Isortcxix sortcxix -#define Isortstack sortstack #define Isortstash sortstash #define Isplitstr splitstr #define Istatcache statcache @@ -398,6 +399,7 @@ #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 @@ -408,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 @@ -430,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 @@ -500,13 +504,14 @@ #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 @@ -538,14 +543,13 @@ #define maxscream Perl_maxscream #define maxsysfd Perl_maxsysfd #define mess_sv Perl_mess_sv -#define mh Perl_mh #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 modcount Perl_modcount +#define modglobal Perl_modglobal #define multiline Perl_multiline #define mystrk Perl_mystrk #define ofmt Perl_ofmt @@ -572,6 +576,8 @@ #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 @@ -583,7 +589,6 @@ #define regnarrate Perl_regnarrate #define regnaughty Perl_regnaughty #define regnpar Perl_regnpar -#define regparse Perl_regparse #define regprecomp Perl_regprecomp #define regprev Perl_regprev #define regprogram Perl_regprogram @@ -593,8 +598,8 @@ #define regstartp Perl_regstartp #define regtill Perl_regtill #define regxend Perl_regxend +#define replgv Perl_replgv #define rightgv Perl_rightgv -#define rx Perl_rx #define sawampersand Perl_sawampersand #define sawstudy Perl_sawstudy #define sawvec Perl_sawvec @@ -603,10 +608,8 @@ #define secondgv Perl_secondgv #define seen_zerolen Perl_seen_zerolen #define siggv Perl_siggv -#define signalstack Perl_signalstack #define sortcop Perl_sortcop #define sortcxix Perl_sortcxix -#define sortstack Perl_sortstack #define sortstash Perl_sortstash #define splitstr Perl_splitstr #define statcache Perl_statcache @@ -622,6 +625,7 @@ #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 @@ -632,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 @@ -654,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 @@ -694,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) @@ -716,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) @@ -777,7 +785,6 @@ #define do_undump (Perl_Vars.Gdo_undump) #define egid (Perl_Vars.Gegid) #define error_count (Perl_Vars.Gerror_count) -#define error_no (Perl_Vars.Gerror_no) #define euid (Perl_Vars.Geuid) #define eval_cond (Perl_Vars.Geval_cond) #define eval_mutex (Perl_Vars.Geval_mutex) @@ -848,6 +855,7 @@ #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) @@ -897,7 +905,6 @@ #define Gdo_undump do_undump #define Gegid egid #define Gerror_count error_count -#define Gerror_no error_no #define Geuid euid #define Geval_cond eval_cond #define Geval_mutex eval_mutex @@ -968,6 +975,7 @@ #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 @@ -1017,7 +1025,6 @@ #define do_undump Perl_do_undump #define egid Perl_egid #define error_count Perl_error_count -#define error_no Perl_error_no #define euid Perl_euid #define eval_cond Perl_eval_cond #define eval_mutex Perl_eval_mutex @@ -1088,6 +1095,7 @@ #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