(Ara) Passive constructions

This commit is contained in:
Inari Listenmaa
2018-11-09 16:38:51 +01:00
parent f70234b1da
commit df65c52cde
2 changed files with 12 additions and 1 deletions
+1 -1
View File
@@ -44,7 +44,7 @@ concrete VerbAra of Verb = CatAra ** open Prelude, ResAra in {
--
-- ReflV2 v = insertObj (\\a => v.c2 ++ reflPron ! a) (predV v) ;
--
PassV2 v = kaan {s = \\_,_ => v.s ! VPPart} ; ---- IL guessed
PassV2 = passPredV ;
--
-- UseVS, UseVQ = \vv -> {s = vv.s ; c2 = [] ; isRefl = vv.isRefl} ; -- no