1
0
forked from GitHub/gf-core

testgf3 in progress; fixed VP type in ExtraEng

This commit is contained in:
aarne
2008-02-22 14:16:33 +00:00
parent b5f9c484d2
commit 6621290502
8 changed files with 18 additions and 24 deletions

View File

@@ -35,7 +35,6 @@ concrete CatEng of Cat = CommonX ** open ResEng, Prelude in {
-- Verb
VP = ResEng.VP ;
Comp = {s : Agr => Str} ;
-- Adjective

View File

@@ -28,7 +28,7 @@ concrete ExtraEng of ExtraEngAbs = CatEng **
ConsVPI = consrTable2 VPIForm Agr comma ;
MkVPI vp = {
s = \\v,a => vp.ad ++ vp.inf ++ vp.s2 ! a
s = \\v,a => vp.inf ++ vp.s2 ! a
} ;
ConjVPI = conjunctTable2 VPIForm Agr ;
ComplVPIVV vv vpi =