diff options
| author | bjorn <bjorn@bringert.net> | 2008-10-31 11:04:22 +0000 |
|---|---|---|
| committer | bjorn <bjorn@bringert.net> | 2008-10-31 11:04:22 +0000 |
| commit | 88fa05749b90a7447a058025ba90082464516253 (patch) | |
| tree | 215dc1f7b6ce7eea7ade6b51f6a7e045c0c379ae /next-lib/src | |
| parent | 5f59b091a0726086dd9b74e671a4d2acc4213abf (diff) | |
ParseEng: ise CompleBareVS as variant of ComplVS
Diffstat (limited to 'next-lib/src')
| -rw-r--r-- | next-lib/src/parsing/ParseEng.gf | 2 |
1 files changed, 1 insertions, 1 deletions
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 = |