* ppt/src :

- Bug make pat_decl_y a reentrant parser. This bug shows only under
      Darwin.

alliance/src/ppt/src/Makefile.am

@@ -18,9 +18,6 @@ CLEANFILES  = pat_decl_y.c pat_decl_y.h pat_desc_y.h pat_desc_y.c \
 pat_decl_y.c pat_decl_y.h : $(srcdir)/pat_decl_y.y
 	$(YACC) -d $(YFLAGS) $(srcdir)/pat_decl_y.y \
 	&& sed -e "s/yy/pat_decl_y_/g" -e "s/YY/PAT_DECL_Y_/g" y.tab.c \
-         | sed -e "s/int[\t ]*pat_decl_y_char;/extern int pat_decl_y_char;/" \
-         | sed -e "s/PAT_DECL_Y_STYPE[\t ]*pat_decl_y_lval;/extern PAT_DECL_Y_STYPE pat_decl_y_lval;/" \
-         | sed -e "s/int[\t ]*pat_decl_y_nerrs;/extern int pat_decl_y_nerrs;/" \
          > pat_decl_y.c \
 	&& sed -e "s/yy/pat_decl_y_/g" -e "s/YY/PAT_DECL_Y_/g" y.tab.h > pat_decl_y.h
 

alliance/src/ppt/src/pat_decl_l.l

@@ -36,6 +36,11 @@
 #include "pat_type.h"
 #include "pat_decl_y.h"
 
+extern int yychar;
+extern YYSTYPE yylval;
+extern int yynerrs;
+
+
 /* ICI LUDO
 #ifdef YY_DECL
 #undef YY_DECL

alliance/src/ppt/src/pat_decl_y.y

@@ -390,6 +390,7 @@ struct paseq  *ptseq ;
 
 %}
 
+%pure-parser
 %union
   {
   int           valu;