25-ending-semicolon.patch

[Akim Demaille]

Index: ChangeLog
from  Akim Demaille  <address@hidden>

        * tests/sets.at (Broken Closure): Add the ending `;'.
        * src/reader.at (readgram): Complain if a rule is not ended with a
        semi-colon.

Index: src/reader.c
--- src/reader.c Sun, 03 Mar 2002 11:27:12 +0100 akim
+++ src/reader.c Sun, 03 Mar 2002 14:46:14 +0100 akim
@@ -1326,7 +1326,10 @@
                unlex (t1);
                symval = ssave;
                if (t1 == tok_colon)
-                 break;
+                 {
+                   complain (_("previous rule lacks an ending `;'"));
+                   break;
+                 }

                if (!first_rhs) /* JF */
                  first_rhs = symval;
Index: tests/sets.at
--- tests/sets.at Sat, 26 Jan 2002 16:46:08 +0100 akim
+++ tests/sets.at Sun, 03 Mar 2002 14:47:36 +0100 akim
@@ -151,14 +151,14 @@ e: 'e' | /* Nothing */;

 AT_DATA([input.y],
 [[%%
-a: b
-b: c
-c: d
-d: e
-e: f
-f: g
-g: h
-h: 'h'
+a: b;
+b: c;
+c: d;
+d: e;
+e: f;
+f: g;
+g: h;
+h: 'h';
 ]])

 AT_CHECK([[bison --trace input.y]], [], [], [stderr])