Reëntrancy fix.

[p5sagit/p5-mst-13.2.git] / embed.h

diff --git a/embed.h b/embed.h
index 50a9d9e..b73e25f 100644 (file)
--- a/embed.h
+++ b/embed.h
@@ -749,6 +749,7 @@
 #else
 #define yylex                  Perl_yylex
 #endif
+#define syylex                 S_syylex
 #define yyparse                        Perl_yyparse
 #define yywarn                 Perl_yywarn
 #if defined(MYMALLOC)
@@ -2206,6 +2207,7 @@
 #else
 #define yylex()                        Perl_yylex(aTHX)
 #endif
+#define syylex()               S_syylex(aTHX)
 #define yyparse()              Perl_yyparse(aTHX)
 #define yywarn(a)              Perl_yywarn(aTHX_ a)
 #if defined(MYMALLOC)
@@ -4325,6 +4327,8 @@
 #define Perl_yylex             CPerlObj::Perl_yylex
 #define yylex                  Perl_yylex
 #endif
+#define S_syylex               CPerlObj::S_syylex
+#define syylex                 S_syylex
 #define Perl_yyparse           CPerlObj::Perl_yyparse
 #define yyparse                        Perl_yyparse
 #define Perl_yywarn            CPerlObj::Perl_yywarn