diff --git a/next-lib/src/arabic/SentenceAra.gf b/next-lib/src/arabic/SentenceAra.gf index eb8147ddb..72b529a29 100644 --- a/next-lib/src/arabic/SentenceAra.gf +++ b/next-lib/src/arabic/SentenceAra.gf @@ -54,11 +54,12 @@ concrete SentenceAra of Sentence = CatAra ** open => vp.pred.s ! gn ! Nom; --xabar marfooc _ => vp.pred.s ! gn ! Acc --xabar kaana wa laysa manSoob }; + } in case o of { Verbal => case of { -----AR case of { +---- AR workaround 18/12/2008 case of { -- ya2kuluhu => (vStr t p) ++ vp.obj.s ++ vp.s2 ++ (pred t p); -- ya2kuluhu al-waladu, yakuluhu al-2awlaadu