Finnish suffixes

This commit is contained in:
aarne
2005-06-23 16:00:55 +00:00
parent 1a100c47e5
commit c431ff315e
4 changed files with 8 additions and 4 deletions

View File

@@ -628,7 +628,7 @@ getHarmony : Str -> Str = \u -> case u of {
-- as a separate word ("auto &+ ni"), which needs unlexing. Unlexing also
-- has to fix the vowel harmony in cases like "äiti &+ nsä".
suff : Str -> Str = \ni -> BIND ++ ni ;
suff : Str -> Str = \ni -> ni ;
possSuffix : Number => Person => Str = \\n,p =>
suff (case <n,p> of {