bugfix in the Swedish paradigms - jazz is jazz in gentive not jazzs

This commit is contained in:
krasimir
2008-12-10 10:58:20 +00:00
parent b62f564d0b
commit e32e085891

View File

@@ -168,7 +168,7 @@ oper
mkCase : Case -> Str -> Str = \c,f -> case c of { mkCase : Case -> Str -> Str = \c,f -> case c of {
Nom => f ; Nom => f ;
Gen => f + case last f of { Gen => f + case last f of {
"s" | "x" => [] ; "s" | "z" | "x" => [] ;
_ => "s" _ => "s"
} }
} ; } ;