move PL_in_my and PL_in_my_stash into the PL_parser struct

p4raw-id: //depot/perl@31203

1 files changed, 1 insertions, 1 deletions

diff --git a/perly.y b/perly.y
index 40836be9f8..33b269ada1 100644
--- a/perly.y
+++ b/perly.y
@@ -1290,7 +1290,7 @@ listexprcom:	/* NULL */
 /* A little bit of trickery to make "for my $foo (@bar)" actually be
    lexical */
 my_scalar:	scalar
-			{ PL_in_my = 0; $$ = my($1); }
+			{ PL_parser->in_my = 0; $$ = my($1); }
 	;
 
 amper	:	'&' indirob