* src/reader.c: Warn about lacking semi-colons, do not complain.

[bison.git] / src / reader.c

diff --git a/src/reader.c b/src/reader.c
index 10411fa20d4fc4736d57f9b412d0420e9c1f4e5f..b23f010163ab46d9afa9aa8f9eaa0c479efa42d4 100644 (file)
--- a/src/reader.c
+++ b/src/reader.c
@@ -1326,7 +1326,10 @@ readgram (void)
                unlex (t1);
                symval = ssave;
                if (t1 == tok_colon)
-                 break;
+                 {
+                   warn (_("previous rule lacks an ending `;'"));
+                   break;
+                 }
 
                if (!first_rhs) /* JF */
                  first_rhs = symval;
@@ -1442,6 +1445,8 @@ readgram (void)
        /* Warn if there is no default for $$ but we need one.  */
        else if (!xactions && !first_rhs && lhs->type_name != 0)
          complain (_("empty rule for typed nonterminal, and no action"));
+       if (t == tok_two_percents || t == tok_eof)
+         warn (_("previous rule lacks an ending `;'"));
        if (t == tok_semicolon)
          t = lex ();
       }