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

marked a workaround

Browse Source
This commit is contained in:
aarne
2008-12-18 15:25:29 +00:00
parent 9e341cc7f9
commit f9e9c582f3
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
next-lib/src/arabic/SentenceAra.gf
View File

@@ -54,11 +54,12 @@ concrete SentenceAra of Sentence = CatAra ** open
<True, ResAra.Pres, Pos> => vp.pred.s ! gn ! Nom; --xabar marfooc <True, ResAra.Pres, Pos> => vp.pred.s ! gn ! Nom; --xabar marfooc
_ => vp.pred.s ! gn ! Acc --xabar kaana wa laysa manSoob _ => vp.pred.s ! gn ! Acc --xabar kaana wa laysa manSoob
}; };
} in } in
case o of { case o of {
Verbal => Verbal =>
case <False, np.a.isPron> of { case <False, np.a.isPron> of {
----AR case <vp.obj.a.isPron, np.a.isPron> of { ---- AR workaround 18/12/2008 case <vp.obj.a.isPron, np.a.isPron> of {
-- ya2kuluhu -- ya2kuluhu
<False,True> => (vStr t p) ++ vp.obj.s ++ vp.s2 ++ (pred t p); <False,True> => (vStr t p) ++ vp.obj.s ++ vp.s2 ++ (pred t p);
-- ya2kuluhu al-waladu, yakuluhu al-2awlaadu -- ya2kuluhu al-waladu, yakuluhu al-2awlaadu