monosyllable prefix

This commit is contained in:
Meowyam
2022-01-12 15:20:26 +08:00
parent 664164e8c1
commit 9d56ac6fee
8 changed files with 34 additions and 11 deletions
+4
View File
@@ -31,6 +31,8 @@ oper
} ;
prefixMeng : Str -> Str = \makan -> case makan of {
? + ? + c => "menge" + makan ;
(#v|"g"|"h") + _
=> "meng" + makan ; -- prefix meng: e.g. meng+atur
"k" + enal
@@ -49,6 +51,8 @@ oper
"s" + alak
=> "meny" + alak ; -- replace s with meny
("r"|"l"|"w"|"y"|"m"|"n"|"ny"|"ng") + _
=> "me" + makan ; -- prefix me