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

fix the object-complement agreement in ComplSlash

Browse Source
This commit is contained in:
krasimir
2008-06-13 19:43:03 +00:00
parent 2166d9ce54
commit d4d33fc5ed
2 changed files with 7 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/resource-1.4/bulgarian/VerbBul.gf
View File

@@ -79,7 +79,13 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
---- END guesses by AR
ComplSlash vp np = insertObjPre (\\_ => vp.c2.s ++ np.s ! RObj vp.c2.c) vp ;
ComplSlash slash np = {
s = slash.s ;
imp = slash.imp ;
ad = slash.ad ;
s2 = \\_ => slash.c2.s ++ np.s ! RObj slash.c2.c ++ slash.s2 ! np.a ;
subjRole = slash.subjRole
} ;
UseComp comp = insertObj comp.s (predV verbBe) ;