From d56e630046505bbb5e8ef9403ac865f996fc34ba Mon Sep 17 00:00:00 2001 From: aarne Date: Sat, 3 Jun 2006 22:09:15 +0000 Subject: [PATCH] corrected Extra; corrected Nor.si_V --- lib/resource-1.0/abstract/Extra.gf | 1 - lib/resource-1.0/english/ExtraEng.gf | 1 - lib/resource-1.0/norwegian/IrregNor.gf | 2 +- lib/resource-1.0/scandinavian/ExtraScand.gf | 1 - 4 files changed, 1 insertion(+), 4 deletions(-) diff --git a/lib/resource-1.0/abstract/Extra.gf b/lib/resource-1.0/abstract/Extra.gf index a7908a2ce..99b7de1a0 100644 --- a/lib/resource-1.0/abstract/Extra.gf +++ b/lib/resource-1.0/abstract/Extra.gf @@ -8,7 +8,6 @@ abstract Extra = Cat ** { fun GenNP : NP -> Quant ; -- this man's - EmbedBareS : S -> SC ; -- (I know) you go ComplBareVS : VS -> S -> VP ; -- know you go } \ No newline at end of file diff --git a/lib/resource-1.0/english/ExtraEng.gf b/lib/resource-1.0/english/ExtraEng.gf index 9aaffa36e..e0bbb8da7 100644 --- a/lib/resource-1.0/english/ExtraEng.gf +++ b/lib/resource-1.0/english/ExtraEng.gf @@ -2,7 +2,6 @@ concrete ExtraEng of ExtraEngAbs = CatEng ** open ResEng in { lin GenNP np = {s = \\_ => np.s ! Gen} ; - EmbedBareS s = s ; ComplBareVS v s = insertObj (\\_ => s.s) (predV v) ; } diff --git a/lib/resource-1.0/norwegian/IrregNor.gf b/lib/resource-1.0/norwegian/IrregNor.gf index 901ace04f..ba734148b 100644 --- a/lib/resource-1.0/norwegian/IrregNor.gf +++ b/lib/resource-1.0/norwegian/IrregNor.gf @@ -49,7 +49,7 @@ concrete IrregNor of IrregNorAbs = CatNor ** open ParadigmsNor in { lin se_V = mkV "se" "ser" "ses" "så" "sett" "se" ; lin selge_V = irregV "selge" "solgte" "solgt" ; lin sette_V = irregV "sette" "satte" "satt" ; - lin si_V = irregV "si" "sa" "sagt" ; + lin si_V = mkV "si" "sier" "sies" "sa" "sagt" "sagd" ; lin sitte_V = irregV "sitte" "satt" "sittet" ; lin skjære_V = irregV "skjære" "skar" "skåret" ; lin skrive_V = irregV "skrive" "skrev" "skrevet" ; diff --git a/lib/resource-1.0/scandinavian/ExtraScand.gf b/lib/resource-1.0/scandinavian/ExtraScand.gf index c743cb908..4968b944c 100644 --- a/lib/resource-1.0/scandinavian/ExtraScand.gf +++ b/lib/resource-1.0/scandinavian/ExtraScand.gf @@ -6,7 +6,6 @@ incomplete concrete ExtraScand of ExtraScandAbs = CatScand ** open CommonScand,R det = DDef Indef } ; - EmbedBareS s = {s = s.s ! Sub} ; ComplBareVS v s = insertObj (\\_ => s.s ! Sub) (predV v) ; }