diff options
| author | krasimir <krasimir@chalmers.se> | 2009-05-08 07:52:50 +0000 |
|---|---|---|
| committer | krasimir <krasimir@chalmers.se> | 2009-05-08 07:52:50 +0000 |
| commit | 80369830a90821ca5dc80f1c8d263ae3f1fa0f44 (patch) | |
| tree | bece701fd898ebe80767f67bc324e8834f9f6779 /next-lib/src | |
| parent | 944267a142f1433725cb2787a3b9b9ba61bb04cc (diff) | |
Turkish: harmony2 and harmony4 should be more liberal
Diffstat (limited to 'next-lib/src')
| -rw-r--r-- | next-lib/src/turkish/ResTur.gf | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/next-lib/src/turkish/ResTur.gf b/next-lib/src/turkish/ResTur.gf index 4d82db531..ed9dc7dcf 100644 --- a/next-lib/src/turkish/ResTur.gf +++ b/next-lib/src/turkish/ResTur.gf @@ -90,13 +90,13 @@ resource ResTur = ParamX ** open Prelude, Predef in { s1@("b"|"v"|"d"|"z"|"j"|"c"|"g"|"ğ"|"l"|"r"|"m"|"n"|"y"|"p"|"f"|"t"|"s"|"ş"|"ç"|"k"|"h") + ("ı"|"i"|"u"|"ü") +s2 => s1+h+s2 ; - _ => error "harmony4" + s => s } ; _ => case suffixC of { s1@(("b"|"v"|"d"|"z"|"j"|"c"|"g"|"ğ"|"l"|"r"|"m"|"n"|"y"|"p"|"f"|"t"|"s"|"ş"|"ç"|"k"|"h")*) + ("ı"|"i"|"u"|"ü") +s2 => s1+h+s2 ; - s => error "harmony4" + s => s } } in base + suffix ; @@ -124,20 +124,20 @@ resource ResTur = ParamX ** open Prelude, Predef in { s1@("b"|"v"|"d"|"z"|"j"|"c"|"g"|"ğ"|"l"|"r"|"m"|"n"|"y"|"p"|"f"|"t"|"s"|"ş"|"ç"|"k"|"h") + ("a"|"e") +s2 => s1+h+s2 ; - _ => error "harmony2" + s => s } ; ("p"|"f"|"t"|"s"|"ş"|"ç"|"k"|"h") => case suffixC of { s1@(("b"|"v"|"z"|"j"|"c"|"g"|"ğ"|"l"|"r"|"m"|"n"|"y"|"p"|"f"|"t"|"s"|"ş"|"ç"|"k"|"h")*) + ("a"|"e") +s2 => s1+h+s2 ; ("da"|"de")+s => "t"+h+s ; - _ => error "harmony2" + s => s } ; _ => case suffixC of { s1@(("b"|"v"|"d"|"z"|"j"|"c"|"g"|"ğ"|"l"|"r"|"m"|"n"|"y"|"p"|"f"|"t"|"s"|"ş"|"ç"|"k"|"h")*) + ("a"|"e") +s2 => s1+h+s2 ; - _ => error "harmony2" + s => s } } in base + suffix ; |