fix the agreement for ClSlash & SSlash

2008-06-13 20:32:33 +00:00
parent 7679730d0f
commit 610574e845
5 changed files with 27 additions and 20 deletions
--- a/lib/resource-1.4/bulgarian/RelativeBul.gf
+++ b/lib/resource-1.4/bulgarian/RelativeBul.gf
@@ -18,7 +18,7 @@ concrete RelativeBul of Relative = CatBul ** open ResBul in {
      } ;

    RelSlash rp slash = {
-      s = \\t,a,p,gn => slash.c2.s ++ (rp.s ! gn) ++ slash.s ! t ! a ! p ! Main ;
+      s = \\t,a,p,gn => slash.c2.s ++ rp.s ! gn ++ slash.s ! (agrP3 gn) ! t ! a ! p ! Main ;
      role = RObj Acc
      } ;