X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=thrdvar.h;h=2cfbfa2dadd234753e5595d966e6577c86be7479;hb=ccf874816b57b9b91848a81cf43371bf7b3f17c8;hp=e0fe1052f17412d4421ac962cdc1a1afbf1456b8;hpb=847a5fae45dac396d0f9e1bb61d5b4ff9d94cdcd;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/thrdvar.h b/thrdvar.h
index e0fe105..2cfbfa2 100644
--- a/thrdvar.h
+++ b/thrdvar.h
@@ -84,15 +84,15 @@ PERLVAR(Tcurpm,		PMOP *)		/* what to do \ interps in REs from */
 PERLVAR(Tnrs,		SV *)
 
 /*
-=for apidoc Amn|SV*|PL_rs
+=for apidoc mn|SV*|PL_rs
 
 The input record separator - C<$/> in Perl space.
 
-=for apidoc Amn|GV*|PL_last_in_gv
+=for apidoc mn|GV*|PL_last_in_gv
 
 The GV which was last used for a filehandle input operation. (C<< <FH> >>)
 
-=for apidoc Amn|SV*|PL_ofs_sv
+=for apidoc mn|SV*|PL_ofs_sv
 
 The output field separator - C<$,> in Perl space.
 
@@ -183,7 +183,7 @@ PERLVAR(Tregstartp,	I32 *)		/* Pointer to startp array. */
 PERLVAR(Tregendp,	I32 *)		/* Ditto for endp. */
 PERLVAR(Treglastparen,	U32 *)		/* Similarly for lastparen. */
 PERLVAR(Tregtill,	char *)		/* How far we are required to go. */
-PERLVAR(Tregprev,	char)		/* char before regbol, \n if none */
+PERLVAR(Tregcompat1,	char)		/* used to be regprev1 */
 PERLVAR(Treg_start_tmp,	char **)	/* from regexec.c */
 PERLVAR(Treg_start_tmpl,U32)		/* from regexec.c */
 PERLVAR(Tregdata,	struct reg_data *)