bugfix ExtraEng.PartVP must also add the particle if there is one

This commit is contained in:
krasimir
2015-10-07 14:05:32 +00:00
parent 3d6aaa0fd3
commit dad76d2cfe

View File

@@ -89,7 +89,7 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
IAdvAdv adv = {s = "how" ++ adv.s} ;
PartVP vp = {
s = \\a => vp.ad ! a ++ vp.prp ++ vp.s2 ! a ++ vp.ext ;
s = \\a => vp.ad ! a ++ vp.prp ++ vp.p ++ vp.s2 ! a ++ vp.ext ;
isPre = vp.isSimple -- depends on whether there are complements
} ;