From e46049aab961ca5eedc147596dfb121d43f5b11d Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Sat, 14 Jun 2008 07:00:22 +0000
Subject: [PATCH] in vocative case don't use definite possesive pronouns

---
 lib/resource-1.4/bulgarian/NounBul.gf | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lib/resource-1.4/bulgarian/NounBul.gf b/lib/resource-1.4/bulgarian/NounBul.gf
index a72446919..882225871 100644
--- a/lib/resource-1.4/bulgarian/NounBul.gf
+++ b/lib/resource-1.4/bulgarian/NounBul.gf
@@ -66,7 +66,7 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
       } ;
 
     DetQuant quant num = {
-      s = \\g,c => quant.s ! aform (gennum g num.n) Def c ++
+      s = \\g,c => quant.s ! aform (gennum g num.n) (case c of {RVocative=>Indef; _=>Def}) c ++
                    num.s ! dgenderSpecies g Indef c ;                   
       n = num.n ;
       countable = num.nonEmpty ;
@@ -74,7 +74,7 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
       } ;
 
     DetQuantOrd = \quant, num, ord -> {
-      s = \\g,c => quant.s ! aform (gennum g num.n) Def c ++
+      s = \\g,c => quant.s ! aform (gennum g num.n) (case c of {RVocative=>Indef; _=>Def}) c ++
                    num.s ! dgenderSpecies g Indef c ++
                    ord.s ! aform (gennum g num.n) Indef c ; 
       n = num.n ;