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

(Ara) Fixes in noun attributes

Browse Source
This commit is contained in:
Inari Listenmaa
2018-11-29 15:52:17 +01:00
parent f71e504f9c
commit ccfa60cbba
2 changed files with 4 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/arabic/NounAra.gf
View File

@@ -195,7 +195,7 @@ lin
-- : CN -> NP -> CN ; -- house of Paris, house of mine
PossNP cn np = cn ** {
s = \\n,_d,c => cn.s ! n ! Const ! c ;
s2 = \\n,_d,c => cn.s2 ! n ! Const ! Gen ; -- unsure about this /IL
s2 = \\n,_d,c => cn.s2 ! n ! Const ! Gen ;
np = \\c => cn.np ! c ++ np.s ! Gen
};

7
src/arabic/ParadigmsAra.gf
View File

@@ -362,10 +362,9 @@ resource ParadigmsAra = open
attrN : Number -> N -> N -> N = \num,n1,n2 -> n1 ** {
s = \\n,_,c => n1.s ! n ! Const ! c ;
s2 = \\n,s,c => let c' = case c of {Dat => Gen; _ => c} in -- the Dat with liPrep hack only applies to the first word
n1.s2 ! num ! s ! c' -- attribute doesn't change
++ n2.s ! num ! s ! c'
++ n2.s2 ! num ! s ! c'} ;
s2 = \\n,s,_ => n1.s2 ! num ! s ! Gen -- attribute doesn't change
++ n2.s ! num ! s ! Gen
++ n2.s2 ! num ! s ! Gen} ;
dualN : N -> N = \n -> n ** {isDual=True} ;