X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fparse.c;h=f2b4f1c78b4cc2b4a85f6ea752e74990d19c952b;hb=08af9f724ce00f0ab6bdbbfc61d6a3e624f2c012;hp=f9461f16bc222fa5f905321c3a22f3b21f27aebc;hpb=173d1687aea88e0e5e1b1d8615ed68ebefb15d08;p=pspp-builds.git

diff --git a/src/language/expressions/parse.c b/src/language/expressions/parse.c
index f9461f16..f2b4f1c7 100644
--- a/src/language/expressions/parse.c
+++ b/src/language/expressions/parse.c
@@ -886,16 +886,13 @@ parse_primary (struct lexer *lexer, struct expression *e)
         union any_node *node;
 	lex_get (lexer);
 	node = parse_or (lexer, e);
-	if (node != NULL && !lex_match (lexer, ')'))
-	  {
-	    lex_error (lexer, _("expecting `)'"));
-            return NULL;
-	  }
+	if (node != NULL && !lex_force_match (lexer, ')'))
+          return NULL;
         return node;
       }
 
     default:
-      lex_error (lexer, _("in expression"));
+      lex_error (lexer, NULL);
       return NULL;
     }
 }