fix the linrefs for prepositions

This commit is contained in:
Krasimir Angelov
2018-06-07 15:17:21 +02:00
parent 2869eaf6e9
commit 546af233fc
2 changed files with 10 additions and 4 deletions
+3
View File
@@ -565,6 +565,9 @@ resource ResBul = ParamX ** open Prelude, Predef in {
in vp.ad.s ++
vp.s ! Imperf ! VPres (numGenNum clitic.agr.gn) clitic.agr.p ++ clitic.s ++
vp.compl ! agr ;
linrefPrep : {s:Str; c:Case} -> Str =
\p -> case p.c of {Acc=>""; Dat=>"íà"; WithPrep=>with_Word} ++ p.s ;
gerund : VP -> Aspect => Agr => Str =
\vp -> \\asp,agr =>