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

bugfix in the Russian RGL

Browse Source
This commit is contained in:
krasimir
2016-05-12 09:44:38 +00:00
parent 18287165e0
commit 36e10e33f4
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/src/russian/SentenceRus.gf
View File

@@ -95,7 +95,7 @@ concrete SentenceRus of Sentence = CatRus ** open Prelude, ResRus in {
EmbedQS qs = {s = qs.s ! QIndir} ;
EmbedVP vp = {s = vp.s2 ++ vp.s!ClInfinit!(GSg Masc) !P3 ++ vp.s3!Masc!Sg} ;
UseCl t p cl = {s = case t.t of {
UseCl t p cl = {s = t.s ++ p.s ++ case t.t of {
Cond => cl.s! p.p ! ClCondit ; --# notpresent
Pres => cl.s! p.p ! ClIndic Present t.a ---- AR work-around 13/12/2007
; --# notpresent