GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-06 01:32:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

adjustments in Phrasebook

Browse Source
This commit is contained in:
aarne
2010-05-27 20:44:39 +00:00
parent 27ff25e82d
commit 327ffc420e
7 changed files with 34 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
lib/src/german/ParadigmsGer.gf
View File

@@ -385,7 +385,8 @@ mkV2 : overload {
regA : Str -> A = \a -> case a of {
teu + "er" => mk3A a (teu + "rer") (teu + "reste") ;
_ + "e" => mk3A a (a + "r") (a + "ste") ;
_ => mk3A a (a + "er") (a + "este")
_ + ("t" | "d" | "s" | "sch" | "z") => mk3A a (a + "er") (a + "este") ;
_ => mk3A a (a + "er") (a + "ste")
} ;
invarA = \s -> {s = \\_,_ => s ; lock_A = <>} ; ---- comparison