Change 31202 by [EMAIL PROTECTED] on 2007/05/12 20:06:41

        eliminate a stray PL_lex_state

Affected files ...

... //depot/perl/toke.c#778 edit

Differences ...

==== //depot/perl/toke.c#778 (text) ====
Index: perl/toke.c
--- perl/toke.c#777~31201~      2007-05-12 12:51:37.000000000 -0700
+++ perl/toke.c 2007-05-12 13:06:41.000000000 -0700
@@ -681,7 +681,7 @@
     parser->nexttoke = 0;
 #endif
     parser->copline = NOLINE;
-    PL_lex_state = LEX_NORMAL;
+    parser->lex_state = LEX_NORMAL;
     parser->expect = XSTATE;
     parser->rsfp = rsfp;
     parser->rsfp_filters = (new_filter || !oparser) ? NULL
End of Patch.

Reply via email to