From 4fcf3bd7f298f727cb5be76cd308e96f2bb6536f Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Fri, 14 Mar 2008 16:57:27 +0000
Subject: [PATCH] whichRP is replaced by suchRP to match closely the English
 grammar

---
 lib/resource/bulgarian/RelativeBul.gf | 2 +-
 lib/resource/bulgarian/ResBul.gf      | 8 ++++++++
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/lib/resource/bulgarian/RelativeBul.gf b/lib/resource/bulgarian/RelativeBul.gf
index a1985ef94..65cf43fde 100644
--- a/lib/resource/bulgarian/RelativeBul.gf
+++ b/lib/resource/bulgarian/RelativeBul.gf
@@ -4,7 +4,7 @@ concrete RelativeBul of Relative = CatBul ** open ResBul in {
 
   lin
     RelCl cl = {
-      s = \\t,a,p,gn => whichRP ! gn ++ cl.s ! t ! a ! p ! Main ; 
+      s = \\t,a,p,gn => suchRP ! gn ++ "че" ++ cl.s ! t ! a ! p ! Main ; 
       role = RSubj
       } ;
 
diff --git a/lib/resource/bulgarian/ResBul.gf b/lib/resource/bulgarian/ResBul.gf
index 3e21ff89f..ad2678e94 100644
--- a/lib/resource/bulgarian/ResBul.gf
+++ b/lib/resource/bulgarian/ResBul.gf
@@ -528,4 +528,12 @@ resource ResBul = ParamX ** open Prelude in {
                 GSg Neut => "което" ;
                 GPl      => "които"
               } ;
+
+    suchRP : GenNum => Str
+           = table {
+               GSg Masc => "такъв" ;
+               GSg Fem  => "такава" ;
+               GSg Neut => "такова" ;
+               GPl      => "такива"
+             } ;
 }