diff --git a/src/hungarian/ResHun.gf b/src/hungarian/ResHun.gf index cda65dda7..21ecd7bab 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 3e6a44378..08d8babda 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