* src/parse-skel.y: Get rid of the shift/reduce conflict:

replace `gb' with BLANKS.
* src/scan-skel.l: Adjust.

diff --git a/ChangeLog b/ChangeLog
index 54b7fd8b0b9eb210e35b182f6acd3adc31ac9a24..69fb9fc59f64e620415c6ff1e77276bc23950e6e 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,10 @@
+2001-12-30  Akim Demaille  <akim@epita.fr>
+
+       * src/parse-skel.y: Get rid of the shift/reduce conflict:
+       replace `gb' with BLANKS.
+       * src/scan-skel.l: Adjust.
+
+       
 2001-12-30  Akim Demaille  <akim@epita.fr>
 
        * src/system.h: We don't need nor want bcopy.

diff --git a/src/parse-skel.y b/src/parse-skel.y
index 0d56dcfe1126afdac6809f55afefbe88489ec8bc..8cf7fcd5d3bd92629b68ffd455b8599e768e4e2a 100644 (file)
--- a/src/parse-skel.y
+++ b/src/parse-skel.y
@@ -50,12 +50,20 @@ static int yyerror PARAMS ((const char* error));
 {
   char *muscle;
   char *string;
+  char *literal;
   char character;
   int yacc;
 }
 
+/* Name of a muscle. */
 %token <muscle> MUSCLE
+/* A string dedicated to Bison (%%"foo").  */
 %token <string> STRING
+/* Raw data, to output directly. */
+%token <literal> RAW
+/* Spaces. */
+%token <literal> BLANKS
+/* Raw data, but char by char. */
 %token <character> CHARACTER
 
 %token LINE
@@ -81,7 +89,7 @@ skeleton : /* Empty.  */    { }
 section : section.header section.body { }
 ;
 
-section.header : SECTION gb MUSCLE gb STRING gb section.yacc gb '\n'
+section.header : SECTION BLANKS MUSCLE BLANKS STRING BLANKS section.yacc '\n'
 {
   char *name = 0;
   char *limit = 0;
@@ -140,6 +148,8 @@ section.body
 | section.body TOKENS { token_definitions_output (parser, &output_line); }
 | section.body ACTIONS { actions_output (parser, &output_line); }
 | section.body CHARACTER { fputc ($2, parser); }
+| section.body RAW       { fputs ($2, parser); }
+| section.body BLANKS    { fputs ($2, parser); }
 | section.body MUSCLE {
   const char* value = muscle_find ($2);
   if (value)
@@ -154,11 +164,6 @@ section.body
     }
 }
 ;
-
-gb : /* Empty.  */ { }
-   | gb CHARACTER  { /* Do not echo garbage characters.  */ }
-;
-
 %%
 
 static int

diff --git a/src/scan-skel.l b/src/scan-skel.l
index 0bb71d196f33fcbbdfc56495244ebe83ed975835..fc88b4a1da19ca4880848d15752dd1f1fabdfe47 100644 (file)
--- a/src/scan-skel.l
+++ b/src/scan-skel.l
@@ -64,6 +64,12 @@
   return '\n';
 }
 
+  /* White spaces.  */
+[\t ]+ {
+  yylval.literal = yytext;
+  return BLANKS;
+}
+
   /* Plain Character.  */
 . {
   yylval.character = *yytext;