From b624e082c1d7c03a25bdddc68c3d70bfe69fc031 Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Wed, 20 Feb 2008 15:12:22 +0000
Subject: [PATCH] Fix GenNP and add GenNPIndef in ExtraBul

---
 resource/bulgarian/ExtraBul.gf    | 4 +++-
 resource/bulgarian/ExtraBulAbs.gf | 2 ++
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/resource/bulgarian/ExtraBul.gf b/resource/bulgarian/ExtraBul.gf
index 9b3694a5..27f8a59d 100644
--- a/resource/bulgarian/ExtraBul.gf
+++ b/resource/bulgarian/ExtraBul.gf
@@ -2,7 +2,9 @@ concrete ExtraBul of ExtraBulAbs = CatBul **
   open ResBul, Coordination, Prelude in {
 
   lin
-    GenNP np = {s = \\aform => np.s ! Gen aform} ;
+    GenNP np = {s = \\gn => np.s ! Gen (aform gn Def Nom); spec=Indef} ;
+    
+    GenNPIndef np = {s = \\gn => np.s ! Gen (aform gn Indef Nom); spec=Indef} ;
     
     i8fem_Pron  = mkNP "аз" "мен" "мой" "моя" "моят" "моя" "моята" "мое" "моето" "мои" "моите" (GSg Fem)  P1 ;
     i8neut_Pron = mkNP "аз" "мен" "мой" "моя" "моят" "моя" "моята" "мое" "моето" "мои" "моите" (GSg Neut) P1 ;
diff --git a/resource/bulgarian/ExtraBulAbs.gf b/resource/bulgarian/ExtraBulAbs.gf
index 0483cdde..0eb6847f 100644
--- a/resource/bulgarian/ExtraBulAbs.gf
+++ b/resource/bulgarian/ExtraBulAbs.gf
@@ -1,6 +1,8 @@
 abstract ExtraBulAbs = Extra ** {
 
 fun
+  GenNPIndef : NP -> Quant ;
+
 -- Feminine variants of pronouns (those in $Structural$ are
 -- masculine, which is the default when gender is unknown).