mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-10-28 10:13:17 -06:00
(Eng) don't drop VP's ext field when making VPI
This commit is contained in:
1 parent
c6f6a749b5
commit
65e5b78edd
1 file changed
+3
-3
@@ -195,9 +195,9 @@ concrete ExtendEng of Extend =
|
||||
|
||||
mkVPI : VP -> VPI = \vp -> lin VPI {
|
||||
s = table {
|
||||
VVAux => \\a => vp.ad ! a ++ vp.inf ++ vp.p ++ vp.s2 ! a ;
|
||||
VVInf => \\a => "to" ++ vp.ad ! a ++ vp.inf ++ vp.p ++ vp.s2 ! a ;
|
||||
VVPresPart => \\a => vp.ad ! a ++ vp.prp ++ vp.p ++ vp.s2 ! a
|
||||
VVAux => \\a => vp.ad ! a ++ vp.inf ++ vp.p ++ vp.s2 ! a ++ vp.ext ;
|
||||
VVInf => \\a => "to" ++ vp.ad ! a ++ vp.inf ++ vp.p ++ vp.s2 ! a ++ vp.ext ;
|
||||
VVPresPart => \\a => vp.ad ! a ++ vp.prp ++ vp.p ++ vp.s2 ! a ++ vp.ext
|
||||
}
|
||||
} ;
|
||||
|
||||
|
||||
Reference in new issue
Block a user