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

(Pes) Generalise infVP to other non-finite verb forms

Browse Source
This commit is contained in:
Inari Listenmaa
2019-05-06 17:17:06 +02:00
parent 361deec532
commit 31d4e5971a
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/persian/ResPes.gf
View File

@@ -112,7 +112,10 @@ oper
} ;
showVPHwithImpPrefix = showVPH' OV True VVPres ;
infVP : VPH -> Str = showVPH' VO False VVPres Inf defaultAgr ;
infVP = overload {
infVP : VPH -> Str = showVPH' VO False VVPres Inf defaultAgr ; -- word order VO, VerbForm infinitive
infVP : VerbForm -> VPH -> Str = \vf,vp -> showVPH' VO False VVPres vf defaultAgr vp -- VO as word order, but VerbForm can be any (e.g. present participle or perfect stem)
} ;
showVPH' : WordOrder -> Bool -> VVTense -> VerbForm -> Agr -> VPH -> Str =
\wo,showImpPref,ant,vf,agr,vp ->