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

double negation in ComplVV

Browse Source
This commit is contained in:
Krasimir Angelov
2018-07-10 11:22:54 +02:00
parent 112aea1efc
commit e5c523e480
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/bulgarian/VerbBul.gf
View File

@@ -34,7 +34,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
ComplVV vv vp = ComplVV vv vp =
insertObj (case vv.typ of { insertObj (case vv.typ of {
VVInf asp => daComplex Simul Pos vp ! asp; VVInf asp => daComplex Simul vp.p vp ! asp;
VVGerund => gerund vp ! Imperf VVGerund => gerund vp ! Imperf
}) vp.p }) vp.p
(predV vv) ; (predV vv) ;