From cc88c32eefb7981de3f5040f2f1062ae7738e77b Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Thu, 12 Nov 2009 20:09:59 +0000
Subject: [PATCH] bugfix: GF.Compile.GrammarToGFCC should not strip the
 parameter values

---
 src/bulgarian/NumeralBul.gf | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/src/bulgarian/NumeralBul.gf b/src/bulgarian/NumeralBul.gf
index 6f57efcd0..ebd431f8d 100644
--- a/src/bulgarian/NumeralBul.gf
+++ b/src/bulgarian/NumeralBul.gf
@@ -77,7 +77,11 @@ lin pot3 n = {
   n = Pl
   } ;
 lin pot3plus n m = {
-  s = \\c,nf => (pot3 (n ** {lock_Sub1000=<>})).s ! NCard (CFMasc Indef NonHuman) ! nf ++ case m.i of {False => []; True  => "и"} ++ m.s ! c ! nf ;
+  s = \\c,nf => case n.n of {
+                  Sg => mkCardOrd100 "хиляда" "хиляден" ! NCard (CFMasc Indef NonHuman) ;
+                  Pl => n.s ! NCard (CFFem Indef) ! nf ++ mkCardOrd100 "хиляди" "хиляден" ! NCard (CFMasc Indef NonHuman)
+                }
+                ++ case m.i of {False => []; True  => "и"} ++ m.s ! c ! nf ;
   n = Pl
   } ;