Minor big fixes to parser.

diff --git a/anag.c b/anag.c
index 724873da8c4a722004bbaf8bac2619676fc55a3f..939f6b890de04a2dbf4f9eb72b1b9b668d100c46 100644 (file)
--- a/anag.c
+++ b/anag.c
@@ -1,6 +1,6 @@
 /* -*-c-*-
  *
- * $Id: anag.c,v 1.3 2001/02/16 21:45:19 mdw Exp $
+ * $Id: anag.c,v 1.4 2001/02/19 19:18:50 mdw Exp $
  *
  * Main driver for anag
  *
@@ -29,6 +29,9 @@
 /*----- Revision history --------------------------------------------------* 
  *
  * $Log: anag.c,v $
+ * Revision 1.4  2001/02/19 19:18:50  mdw
+ * Minor big fixes to parser.
+ *
  * Revision 1.3  2001/02/16 21:45:19  mdw
  * Be more helpful.  Improve full help message.  Special-case error for
  * empty command strings.
@@ -320,7 +323,7 @@ static void p_factor(p_ctx *p, node **nn)
     p_next(p);
     p_expr(p, nn);
     if (p->t != O_RPAREN)
-      die("syntax error near `%s': missing `('", *p->a);
+      die("syntax error near `%s': missing `)'", *p->a);
     p_next(p);
   } else if (p->t == O_NOT) {
     n = xmalloc(sizeof(node_un));
@@ -350,7 +353,6 @@ static void p_term(p_ctx *p, node **nn)
        p_next(p);
       default:
        break;
-      case O_LPAREN:
       case O_RPAREN:
       case O_OR:
       case O_EOF: