(Hun) Fix have_V2

This commit is contained in:
Inari Listenmaa
2020-04-17 12:50:33 +02:00
parent ae2e3465fe
commit f5068a76de
2 changed files with 7 additions and 1 deletions
+6
View File
@@ -193,6 +193,12 @@ oper
-- c3 : Case -- indirect object case
} ;
datV2 : Verb -> Verb2 = \v -> {
s = \\_ => v.s ;
sc = SCDat ;
c2 = Nom
} ;
mkVerb2 : Str -> Verb2 = \sg3 -> vtov2 (mkVerb sg3) ;
mkVerb3 : Str -> Verb3 = \sg3 -> v2tov3 (mkVerb2 sg3) ;