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

missing AdvS in Rus added

Browse Source
This commit is contained in:
aarne
2007-06-19 07:35:01 +00:00
parent 7ba9b68463
commit 953b5a635a
2 changed files with 5 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/resource-1.0/Makefile
View File

@@ -12,7 +12,9 @@ GFC=$(GFCC) -src
# comment the first and uncomment the second in Windows
GFCP=$(GFC) -preproc=./mkPresent
GFCCP=$(GFCC) -preproc=./mkPresent
#GFCP=$(GFC) -preproc=mkPresent

3
lib/resource-1.0/russian/SentenceRus.gf
View File

@@ -82,6 +82,9 @@ concrete SentenceRus of Sentence = CatRus ** open Prelude, ResRus in {
_ => qcl.s!p.p! ClIndic (getTense t.t) a.a }};
UseRCl t a p rcl ={s = \\gn,c,anim => case t.t of {
Cond => [", "] ++ rcl.s! p.p ! ClCondit ! gn !c !anim ;
_ => [", "] ++ rcl.s! p.p ! ClIndic (getTense t.t) a.a !gn !c !anim}};
AdvS a s = {s = a.s ++ "," ++ s.s} ; ---- AR 19/6/2007