diff --git a/resource/english/CatEng.gf b/resource/english/CatEng.gf index 2a8e948c..384cabe6 100644 --- a/resource/english/CatEng.gf +++ b/resource/english/CatEng.gf @@ -35,7 +35,6 @@ concrete CatEng of Cat = CommonX ** open ResEng, Prelude in { -- Verb VP = ResEng.VP ; - Comp = {s : Agr => Str} ; -- Adjective diff --git a/resource/english/ExtraEng.gf b/resource/english/ExtraEng.gf index a8904ec8..ab7682a9 100644 --- a/resource/english/ExtraEng.gf +++ b/resource/english/ExtraEng.gf @@ -28,7 +28,7 @@ concrete ExtraEng of ExtraEngAbs = CatEng ** ConsVPI = consrTable2 VPIForm Agr comma ; MkVPI vp = { - s = \\v,a => vp.ad ++ vp.inf ++ vp.s2 ! a + s = \\v,a => vp.inf ++ vp.s2 ! a } ; ConjVPI = conjunctTable2 VPIForm Agr ; ComplVPIVV vv vpi =