From 3ff35a717d226f00ffe812582bfa6795d6543425 Mon Sep 17 00:00:00 2001
From: krasimir <krasimir@chalmers.se>
Date: Sat, 23 Feb 2008 12:02:09 +0000
Subject: [PATCH] add AdvCN

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

diff --git a/resource/bulgarian/NounBul.gf b/resource/bulgarian/NounBul.gf
index 0b4322a76..94f01b1ae 100644
--- a/resource/bulgarian/NounBul.gf
+++ b/resource/bulgarian/NounBul.gf
@@ -104,6 +104,10 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
       s = \\nf => preOrPost ap.isPre (ap.s ! nform2aform nf cn.g) (cn.s ! (indefNForm nf)) ;
       g = cn.g
       } ;
-      
+    AdvCN cn ad = {
+      s = \\nf => cn.s ! nf ++ ad.s ;
+      g = cn.g
+    } ;
+
     SentCN cn sc = {s = \\nf => cn.s ! nf ++ sc.s; g=cn.g} ;
 }