From 4bf1c6832e35b946e877b35a73e44e6b20ea329a Mon Sep 17 00:00:00 2001 From: Krasimir Angelov Date: Wed, 30 May 2018 14:38:49 +0200 Subject: [PATCH] added ExtendBul.EmptyRelSlash --- src/bulgarian/ExtendBul.gf | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/src/bulgarian/ExtendBul.gf b/src/bulgarian/ExtendBul.gf index c5be4ee18..a54f9d4d6 100644 --- a/src/bulgarian/ExtendBul.gf +++ b/src/bulgarian/ExtendBul.gf @@ -2,6 +2,11 @@ concrete ExtendBul of Extend = CatBul ** open Prelude, ResBul in { lin + EmptyRelSlash slash = { + s = \\t,a,p,agr => slash.c2.s ++ whichRP ! agr.gn ++ slash.s ! agr ! t ! a ! p ! Main ; + role = RObj Acc + } ; + CompoundN n1 n2 = let aform = ASg (case n2.g of { AMasc _ => Masc ;