GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-04-29 14:32:51 -06:00
Code Issues Packages Projects Releases Wiki Activity

fixes in the Bulgarian resource grammar. extensions in DictEng and DictEngBul

Browse Source
This commit is contained in:
kr.angelov
2012-09-24 09:41:14 +00:00
parent 18fe8af964
commit 249d6cc2f8
9 changed files with 151 additions and 110 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/src/bulgarian/VerbBul.gf
View File

@@ -40,7 +40,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
-- test: I saw a boy whom she begged to walk
SlashV2V vv vp =
insertSlashObj2 (daComplex Simul Pos vp ! Perf) (slashV vv vv.c2) ;
insertSlashObj2 (\\agr => vv.c3.s ++ daComplex Simul Pos vp ! Perf ! agr) (slashV vv vv.c2) ;
-- test: I saw a car whom she wanted to buy
SlashVV vv slash = {
@@ -66,7 +66,7 @@ concrete VerbBul of Verb = CatBul ** open Prelude, ResBul, ParadigmsBul in {
ComplSlash slash np = {
s = slash.s ;
ad = slash.ad ;
compl = \\a => slash.compl1 ! a ++ slash.c2.s ++ np.s ! RObj slash.c2.c ++ slash.compl2 ! np.a ;
compl = \\a => slash.compl1 ! a ++ slash.c2.s ++ np.s ! RObj slash.c2.c ++ slash.compl2 ! a ;
vtype = slash.vtype
} ;