word order in subordinate German AdvS fixed

This commit is contained in:
aarne
2009-12-17 21:31:02 +00:00
parent 4e28be6958
commit 5c9ac3655e

View File

@@ -60,7 +60,7 @@ concrete SentenceGer of Sentence = CatGer ** open ResGer, Prelude in {
c2 = cl.c2
} ;
AdvS a s = {s = \\o => a.s ++ s.s ! Inv} ;
AdvS a s = {s = table {Sub => a.s ++ s.s ! Sub ; o => a.s ++ s.s ! Inv}} ;
SSubjS a s b = {s = \\o => a.s ! o ++ "," ++ s.s ++ b.s ! Sub} ;