diff --git a/lib/resource/bulgarian/SentenceBul.gf b/lib/resource/bulgarian/SentenceBul.gf index 7d6911958..d1a2626f6 100644 --- a/lib/resource/bulgarian/SentenceBul.gf +++ b/lib/resource/bulgarian/SentenceBul.gf @@ -17,6 +17,13 @@ concrete SentenceBul of Sentence = CatBul ** open Prelude, ResBul in { SlashV2 np v2 = mkClause (np.s ! Nom) np.a (predV v2) ** {c2 = v2.c2} ; + AdvSlash slash adv = { + s = \\t,a,b,o => slash.s ! t ! a ! b ! o ++ adv.s ; + c2 = slash.c2 + } ; + + SlashPrep cl prep = cl ** {c2 = prep.s} ; + EmbedS s = {s = "," ++ "χε" ++ s.s} ; EmbedQS qs = {s = qs.s ! QIndir} ; @@ -26,4 +33,8 @@ concrete SentenceBul of Sentence = CatBul ** open Prelude, ResBul in { UseQCl t a p cl = { s = \\q => t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! q } ; + UseSlash t a p cl = { + s = t.s ++ a.s ++ p.s ++ cl.s ! t.t ! a.a ! p.p ! Main ; + c2 = cl.c2 + } ; } \ No newline at end of file