GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-05-27 17:08:54 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Hun) Add possessive forms in MassNP

Browse Source
This commit is contained in:
Inari Listenmaa
2020-05-29 15:23:48 +02:00
parent 52d475e040
commit eefefbf792
1 changed files with 7 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
src/hungarian/NounHun.gf
View File

@@ -77,8 +77,13 @@ concrete NounHun of Noun = CatHun ** open
-- : CN -> NP ;
MassNP cn = emptyNP ** {
s = \\p,c => caseFromStem glue cn c Sg ++ -- TODO add possessors
cn.compl ! Sg ! c ;
s = \\p,c => case p of {
NoPoss => caseFromStem glue cn c Sg ;
Poss per rnum =>
let pron : Pronoun = pronTable ! <per,rnum> ; -- Possessor's number
dnum : CatHun.Num = NumSg ; -- because this is MassNP, no Det
in caseFromPossStem cn (DetQuant (PossPron pron) dnum) c
} ++ cn.compl ! Sg ! c ;
agr = <P3,Sg> ;
} ;