GitHub/gf-rgl
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-rgl.git synced 2026-06-24 18:46:28 -06:00
Code Issues Packages Projects Releases Wiki Activity

(Hun) Rename some parameters + add show funs for param names

Browse Source
This commit is contained in:
Inari Listenmaa
2020-04-27 17:19:18 +02:00
parent fd6541846f
commit 5f6db51183
6 changed files with 49 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/hungarian/VerbHun.gf
+3 -3
View File
@@ -133,8 +133,8 @@ lin
-- : NP -> Comp ;
CompNP np = UseCopula ** {
s = \\vf => case vf of {
VPres P3 _ => np.s ! NotPossessed ! Nom ;
_ => np.s ! NotPossessed ! Nom ++ copula.s ! vf } ;
VPres P3 _ => np.s ! NoPoss ! Nom ;
_ => np.s ! NoPoss ! Nom ++ copula.s ! vf } ;
} ;
-- : Adv -> Comp ;
@@ -149,7 +149,7 @@ oper
insertObj : ResHun.VPSlash -> NounPhrase -> VerbPhrase = \vps,np -> vps ** {
obj = case <vps.sc,vps.c2> of {
<SCDat,Nom> => [] ;
_ => np.s ! NotPossessed ! vps.c2 } ;
_ => np.s ! NoPoss ! vps.c2 } ;
s = \\vf =>
-- If verb's subject case is Dat and object Nom, verb agrees with obj.