msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

use SOFT_BIND in the Bulgarian and Swedish grammars

Browse Source
This commit is contained in:
kr.angelov
2013-11-12 10:18:35 +00:00
parent 4b80a15b6c
commit d6f73f175f
11 changed files with 16 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
lib/src/bulgarian/SentenceBul.gf
View File

@@ -47,7 +47,7 @@ concrete SentenceBul of Sentence = CatBul ** open Prelude, ResBul in {
c2 = slash.c2
} ;
EmbedS s = {s = "," ++ "֌" ++ s.s} ;
EmbedS s = {s = comma ++ "֌" ++ s.s} ;
EmbedQS qs = {s = qs.s ! QIndir} ;
EmbedVP vp = {s = daComplex Simul Pos vp ! Perf ! {gn=GSg Masc; p=P1}} ;
@@ -66,10 +66,10 @@ concrete SentenceBul of Sentence = CatBul ** open Prelude, ResBul in {
c2 = cl.c2
} ;
ExtAdvS a s = {s = a.s ++ "," ++ s.s} ;
ExtAdvS a s = {s = a.s ++ comma ++ s.s} ;
AdvS a s = {s = a.s ++ s.s} ;
SSubjS a s b = {s = a.s ++ "," ++ s.s ++ b.s} ;
SSubjS a s b = {s = a.s ++ comma ++ s.s ++ b.s} ;
RelS s r = {s = s.s ++ "," ++ r.s ! {gn=gennum ANeut Sg; p=P3}} ;
RelS s r = {s = s.s ++ comma ++ r.s ! {gn=gennum ANeut Sg; p=P3}} ;
}