msyds/gf-rgl
1
0
Fork 0
forked from GitHub/gf-rgl
Code Pull Requests Activity

(Hun) Fix have_V2

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

6
src/hungarian/ResHun.gf
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) ;

2
src/hungarian/StructuralHun.gf
View File

@@ -214,7 +214,7 @@ lin yes_Utt = ss "igen" ;
-------
-- Verb
lin have_V2 = vtov2 copula ** {sc = SCDat ; c2 = Nom} ;
lin have_V2 = datV2 copula ;
{-lin can8know_VV = can_VV ; -- can (capacity)
lin can_VV = mkVV "" ; -- can (possibility)
lin must_VV = mkVV "" ;