bug fix in stemmed/NounFin with sp forms of IndefArt

This commit is contained in:
aarne
2013-03-30 17:07:57 +00:00
parent c2f2fc66a7
commit 68bf1cc2f9
4 changed files with 17 additions and 7 deletions

View File

@@ -243,7 +243,8 @@ oper
<Anter,Pos> => vf (olla ! p) part ; --# notpresent
<Anter,Neg> => vf ei (ole ++ part) ; --# notpresent
<Simul,Neg> => vf ei neg
}
} ;
passPol = case b of {Pos => True ; Neg => False} ;
in
case vi of {
VIFin Past => mkvf (Impf agr.n agr.p) ; --# notpresent
@@ -251,7 +252,7 @@ oper
VIFin Fut => mkvf (Presn agr.n agr.p) ; --# notpresent
VIFin Pres => mkvf (Presn agr.n agr.p) ;
VIImper => mkvf (Imper agr.n) ;
VIPass => mkvf (Pass True) ;
VIPass => mkvf (Pass passPol) ;
VIInf i => mkvf (Inf i)
} ;