GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-09-28 13:13:39 -06:00
Code Issues Packages Projects Releases Wiki Activity

extensions from Codex

Browse Source
This commit is contained in:
Krasimir Angelov
2026-09-20 17:55:32 +02:00
parent 9090a3cda3
commit 0196d3006f
12 changed files with 240 additions and 12 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/arabic/ResAra.gf
+8 -2
View File
@@ -465,8 +465,11 @@ oper
param
VPForm = VPPerf
| VPPassPerf
| VPImpf Mood
| VPPassImpf Mood
| VPImp
| VPPPart
| VPGer ;
VType = -- indicates if there is a predicate (xabar):
@@ -500,8 +503,11 @@ oper
let gn = pgn2gn pgn in
case vf of {
VPPerf => v.s ! VPerf Act pgn ;
VPPassPerf => v.s ! VPerf Pas pgn ;
VPImpf m => v.s ! VImpf m Act pgn ;
VPPassImpf m => v.s ! VImpf m Pas pgn ;
VPImp => v.s ! VImp gn.g gn.n ;
VPPPart => v.s ! VPPart ;
VPGer => v.s ! Masdar
};
sc = noPrep ;
@@ -515,8 +521,8 @@ oper
let actVP = predV v in actVP ** {
s = \\pgn,vf =>
case vf of {
VPPerf => v.s ! VPerf Pas pgn ;
VPImpf m => v.s ! VImpf m Pas pgn ;
VPPerf => actVP.s ! pgn ! VPPassPerf ;
VPImpf m => actVP.s ! pgn ! VPPassImpf m ;
_ => actVP.s ! pgn ! vf
}
};