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

(Ara) Add SubjS

Browse Source
This commit is contained in:
Inari Listenmaa
2018-11-19 12:05:50 +01:00
parent 75ab225161
commit efebc082fa
1 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
src/arabic/AdverbAra.gf
View File

@@ -14,7 +14,8 @@ concrete AdverbAra of Adverb = CatAra ** open ResAra, Prelude in {
-- AdAdv = cc2 ; -- AdAdv = cc2 ;
-- --
-- SubjS = cc2 ; -- : Subj -> S -> Adv ; -- when she sleeps
SubjS subj s = {s = subj.s ++ s.s ! Subord} ;
-- AdvSC s = s ; --- this rule give stack overflow in ordinary parsing -- AdvSC s = s ; --- this rule give stack overflow in ordinary parsing
-- --
-- AdnCAdv cadv = {s = cadv.s ++ "تهَن"} ; -- AdnCAdv cadv = {s = cadv.s ++ "تهَن"} ;