From 0eaba1fe1f37ec76835a5bf8ee7c226538e99471 Mon Sep 17 00:00:00 2001 From: bjorn Date: Fri, 31 Oct 2008 11:04:22 +0000 Subject: [PATCH] ParseEng: ise CompleBareVS as variant of ComplVS --- next-lib/src/parsing/ParseEng.gf | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/next-lib/src/parsing/ParseEng.gf b/next-lib/src/parsing/ParseEng.gf index 0edc1ee34..e16a790d0 100644 --- a/next-lib/src/parsing/ParseEng.gf +++ b/next-lib/src/parsing/ParseEng.gf @@ -39,7 +39,7 @@ flags startcat = Phr ; unlexer = text ; lexer = text ; -- -- Allow both "hope that he runs" and "hope he runs". -lin ComplVS v s = variants { VerbEng.ComplVS v s; insertObj (\\_ => s.s) (predV v) } ; +lin ComplVS v s = variants { VerbEng.ComplVS v s; ComplBareVS v s } ; -- Allow both contracted and uncontracted negated clauses. lin UseCl t p cl =