From 67bf0b0dd220dd83b50073df5a5713190025aa5d Mon Sep 17 00:00:00 2001 From: aarne Date: Sat, 29 May 2010 09:17:48 +0000 Subject: [PATCH] Dutch s -> z rule restricted more --- src/dutch/ResDut.gf | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/dutch/ResDut.gf b/src/dutch/ResDut.gf index 8bec038e4..1e4703e5b 100644 --- a/src/dutch/ResDut.gf +++ b/src/dutch/ResDut.gf @@ -53,7 +53,7 @@ resource ResDut = ParamX ** open Prelude in { shortVoc : Str -> Str -> Str = \v,s -> init v + endCons s ; endCons : Str -> Str = \s -> case s of { - _ + ("ts" |"rs" | "ls") => s ; + _ + ("ts" |"rs" | "ls" | "ds" | "ns" | "ms") => s ; b + "s" => b + "z" ; b + "f" => b + "v" ; _ => s