add Slash category

2008-02-22 14:06:14 +00:00
parent 621d3fdfd1
commit ec4edf4524
2 changed files with 7 additions and 0 deletions
--- a/lib/resource/bulgarian/SentenceBul.gf
+++ b/lib/resource/bulgarian/SentenceBul.gf
@@ -14,6 +14,9 @@ concrete SentenceBul of Sentence = CatBul ** open Prelude, ResBul in {
        verb ++ compl
    } ;

+    SlashV2 np v2 = 
+      mkClause (np.s ! Nom) np.a (predV v2) ** {c2 = v2.c2} ;
+
    EmbedS  s  = {s = "," ++ "÷å" ++ s.s} ;
    EmbedQS qs = {s = qs.s ! QIndir} ;