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

(Ara) force also imperative forms in forcePerson

Browse Source
This commit is contained in:
Inari Listenmaa
2019-01-23 13:57:26 +01:00
parent 1c4db86736
commit fa5f4fe829
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/arabic/ResAra.gf
View File

@@ -423,10 +423,12 @@ oper
-- Sometimes a verb is only used in one form (per3 masc sg); -- Sometimes a verb is only used in one form (per3 masc sg);
-- ideally, one would use an impersonal syntactic construction, -- ideally, one would use an impersonal syntactic construction,
-- less ideally, hardcode the verb to only contain forms of one person. -- less ideally, hardcode the verb to only contain forms of one person.
forcePerson : PerGenNum -> Verb -> Verb = \pgn,verb -> verb ** { forcePerson : PerGenNum -> Verb -> Verb = \pgn,verb ->
let gn = pgn2gn pgn in verb ** {
s = \\vf => case vf of { s = \\vf => case vf of {
VPerf v _ => verb.s ! VPerf v pgn ; VPerf v _ => verb.s ! VPerf v pgn ;
VImpf m v _ => verb.s ! VImpf m v pgn ; VImpf m v _ => verb.s ! VImpf m v pgn ;
VImp _g _n => verb.s ! VImp gn.g gn.n ;
_ => verb.s ! vf } _ => verb.s ! vf }
} ; } ;