included capitals in some phonological string pattern matching in Fin and Ita

This commit is contained in:
aarne committed 2013-01-28 14:12:24 +00:00
1 parent f7f40e3ec7
commit 27cd59b407
2 files changed
+4 -3

No files matched your search

+1 -1
View File
@@ -824,7 +824,7 @@ resource MorphoFin = ResFin ** open Prelude in {
} ;
vowHarmony : Str -> Str = \s -> case s of {
_ + ("a" | "o" | "u") + _ => "a" ;
_ + ("a" | "o" | "u" | "A" | "O" | "U") + _ => "a" ;
_ => "ä"
} ;