From 2aaccfface92bf84693b858d617b0fd009fb6cb2 Mon Sep 17 00:00:00 2001 From: Inari Listenmaa Date: Sun, 28 Jun 2020 09:47:33 +0200 Subject: [PATCH] (Hun) Fix harmony of something_NP --- src/hungarian/ResHun.gf | 6 ++++++ src/hungarian/StructuralHun.gf | 2 +- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/src/hungarian/ResHun.gf b/src/hungarian/ResHun.gf index cda65dda..21ecd7ba 100644 --- a/src/hungarian/ResHun.gf +++ b/src/hungarian/ResHun.gf @@ -97,6 +97,12 @@ oper objdef = Def ; } ; + defNPPrefix : (p,n : Str) -> Number -> NounPhrase = \vala,mi,n -> emptyNP ** { + s = \\p,c => vala + mkCaseNoun mi ! n ! c ; + n = n ; + objdef = Def ; + } ; + linCN : CNoun -> Str = \cn -> cn.s ! SgNom ++ cn.compl ! Sg ! Nom ++ cn.postmod ; linNP' : Possessor -> Case -> NounPhrase -> Str = \p,c,np -> np.s ! p ! c ++ np.postmod ; linNP : NounPhrase -> Str = linNP' NoPoss Nom ; diff --git a/src/hungarian/StructuralHun.gf b/src/hungarian/StructuralHun.gf index 3e6a4437..08d8babd 100644 --- a/src/hungarian/StructuralHun.gf +++ b/src/hungarian/StructuralHun.gf @@ -87,7 +87,7 @@ lin nobody_NP = mkVerb; "" lin nothing_NP = defNP "" N.NumSg ; lin somebody_NP = defNP "" N.NumSg ; -} -lin something_NP = defNP "valami" Sg ; +lin something_NP = defNPPrefix "vala" "mi" Sg ; -- vowel harmony according to mi ------- -- Prep