From 47b60d0b88f5087e757994f4524d8294021b4a6d Mon Sep 17 00:00:00 2001 From: aarne Date: Thu, 15 Jan 2009 09:53:19 +0000 Subject: [PATCH] empty variants in mkVV eliminated --- next-lib/src/english/ParadigmsEng.gf | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/next-lib/src/english/ParadigmsEng.gf b/next-lib/src/english/ParadigmsEng.gf index 5d7dd2540..dcffa9832 100644 --- a/next-lib/src/english/ParadigmsEng.gf +++ b/next-lib/src/english/ParadigmsEng.gf @@ -528,7 +528,8 @@ mkSubj : Str -> Subj = \s -> {s = s ; lock_Subj = <>} ; mkVS v = v ** {lock_VS = <>} ; mkVV v = { - s = table {VVF vf => v.s ! vf ; _ => variants {}} ; + s = table {VVF vf => v.s ! vf ; _ => v.s ! VInf} ; + --- variants {}} ; not used isAux = False ; lock_VV = <> } ; mkVQ v = v ** {lock_VQ = <>} ;