X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=embedvar.h;h=4870703e05029fcbbf0bd5168a95d95dab0185af;hb=e91177edb0beae74fd07fb1ec08a528ab1fb63c2;hp=cd4701d1e99a46a06acd9e9ad6c3139480de98e6;hpb=873ef191be9d12eed8116e23926efe319c6ed859;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/embedvar.h b/embedvar.h
index cd4701d..4870703 100644
--- a/embedvar.h
+++ b/embedvar.h
@@ -153,7 +153,6 @@
 #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)
@@ -187,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)
@@ -198,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)
@@ -208,8 +208,8 @@
 #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)
@@ -317,7 +317,6 @@
 #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
@@ -351,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
@@ -362,7 +363,6 @@
 #define Iregnarrate		regnarrate
 #define Iregnaughty		regnaughty
 #define Iregnpar		regnpar
-#define Iregparse		regparse
 #define Iregprecomp		regprecomp
 #define Iregprev		regprev
 #define Iregprogram		regprogram
@@ -372,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
@@ -543,7 +543,6 @@
 #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
@@ -577,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
@@ -588,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
@@ -598,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
@@ -785,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)
@@ -856,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)
@@ -905,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
@@ -976,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
@@ -1025,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
@@ -1096,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