msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Hun) Fix harmony of something_NP

Browse Source
This commit is contained in:
Inari Listenmaa
2020-06-28 09:47:33 +02:00
parent b33a65bbb5
commit 2aaccfface
2 changed files with 7 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/hungarian/ResHun.gf
View File

@@ -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 ;