(Kor) Bugfix in RelVP
This commit is contained in:
1 parent
5a3a5597a8
commit
0053d8223c
1 file changed
+3
-1
@@ -7,7 +7,9 @@ lin
|
||||
|
||||
-- : RP -> VP -> RCl ;
|
||||
RelVP rp vp = {
|
||||
s = \\t,a,p => vp.s ! VAttr p -- TODO no tenses yet in the grammar
|
||||
s = \\t,a,p => vp.adv
|
||||
++ vp.nObj
|
||||
++ vp.s ! VAttr p -- TODO no tenses yet in the grammar
|
||||
++ rp.s ;
|
||||
} ;
|
||||
|
||||
|
||||
Reference in new issue
Block a user