use SOFT_BIND to glue the hyphen in the comparative and superlative forms of the Bulgarian adjectives

This commit is contained in:
kr.angelov
2013-11-12 10:34:07 +00:00
parent 6449bbad9c
commit 7585d68dd8
3 changed files with 6 additions and 5 deletions

View File

@@ -9,13 +9,13 @@ concrete AdjectiveBul of Adjective = CatBul ** open ResBul, Prelude in {
} ;
ComparA a np = {
s = \\aform => "ïî" ++ "-" ++ a.s ! aform ++ "îò" ++ np.s ! RObj Acc ;
adv = "ïî" ++ "-" ++ a.adv ++ "îò" ++ np.s ! RObj Acc ;
s = \\aform => "ïî" ++ hyphen ++ a.s ! aform ++ "îò" ++ np.s ! RObj Acc ;
adv = "ïî" ++ hyphen ++ a.adv ++ "îò" ++ np.s ! RObj Acc ;
isPre = True
} ;
UseComparA a = {
s = \\aform => "ïî" ++ "-" ++ a.s ! aform ;
adv = "ïî" ++ "-" ++ a.adv ;
s = \\aform => "ïî" ++ hyphen ++ a.s ! aform ;
adv = "ïî" ++ hyphen ++ a.adv ;
isPre = True
} ;