mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-16 22:52:50 -06:00
missing AdvS in Rus added
This commit is contained in:
@@ -12,7 +12,9 @@ GFC=$(GFCC) -src
|
|||||||
|
|
||||||
# comment the first and uncomment the second in Windows
|
# comment the first and uncomment the second in Windows
|
||||||
GFCP=$(GFC) -preproc=./mkPresent
|
GFCP=$(GFC) -preproc=./mkPresent
|
||||||
|
|
||||||
GFCCP=$(GFCC) -preproc=./mkPresent
|
GFCCP=$(GFCC) -preproc=./mkPresent
|
||||||
|
|
||||||
#GFCP=$(GFC) -preproc=mkPresent
|
#GFCP=$(GFC) -preproc=mkPresent
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -83,5 +83,8 @@ concrete SentenceRus of Sentence = CatRus ** open Prelude, ResRus in {
|
|||||||
|
|
||||||
UseRCl t a p rcl ={s = \\gn,c,anim => case t.t of {
|
UseRCl t a p rcl ={s = \\gn,c,anim => case t.t of {
|
||||||
Cond => [", "] ++ rcl.s! p.p ! ClCondit ! gn !c !anim ;
|
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
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user