ExtAdvS added to more languages

This commit is contained in:
aarne
2011-09-01 07:56:29 +00:00
parent 40022d7af9
commit 938662db44
6 changed files with 8 additions and 3 deletions

View File

@@ -129,7 +129,8 @@ concrete SentenceRus of Sentence = CatRus ** open Prelude, ResRus in {
};
AdvS a s = {s = a.s ++ "," ++ s.s} ; ---- AR 19/6/2007
AdvS a s = {s = a.s ++ s.s} ; ---- AR 19/6/2007
ExtAdvS a s = {s = a.s ++ "," ++ s.s} ; ---- AR 1/9/2011
---- AR 17/12/2008
RelS s r = {s = s.s ++ "," ++ r.s ! gennum Neut Sg ! Nom ! Inanimate} ; ---- ?