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

(Ara) misc. small fixes/additions

Browse Source
This commit is contained in:
Inari Listenmaa
2019-01-09 19:39:04 +02:00
parent 5a0818920b
commit 90f1585d7e
2 changed files with 2 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/arabic/ConstructionAra.gf
View File

@@ -57,7 +57,7 @@ lin
oper
amount_N : N = mkN "مِقْدَار" "مَقَادِير‎" masc nohum ;
amount_N : N = mkN "مِقْدَار" "مَقَادِير" masc nohum ;
-- hack used in the name constructions
toNP : Bool -> NP -> NP = \b -> if_then_else NP b R.emptyNP ;

1
src/arabic/ParadigmsAra.gf
View File

@@ -450,6 +450,7 @@ resource ParadigmsAra = open
in case rootStr of {
f@? + c@? + "ّ" => v1geminate (f+c+c) vPerf vImpf ;
? + #hamza + #weak => v1doubleweak root ;
#weak + ? + #weak => v1assimilated_defective root vPerf vImpf ;
? + ? + #weak => case vPerf of {
i => v1defective_i root vImpf ;
_ => v1defective_a root vImpf } ;