making Arabic minimal compile; strange chars remain

This commit is contained in:
aarne
2009-12-08 07:32:46 +00:00
parent 5981a279a3
commit 076643c4e1
4 changed files with 11 additions and 10 deletions

View File

@@ -41,9 +41,9 @@ flags optimize = all ;--noexpand; coding=utf8 ;
vowel : Case => Str =
table {
Nom => "ُ";
Acc => "َ";
Gen => "ِ"
Nom => "ُ";
Acc => "َ";
Gen => "ِ"
};
}

View File

@@ -355,7 +355,7 @@ resource ParadigmsAra = open
-- e.g. al-jamii3, 2a7ad
regNP : Str -> Number -> NP = \word,n ->
{ s = \\c => word + vowel ! c ;
{ s = \\c => word ++ vowel ! c ; ---- gives strange chars
a = {pgn = Per3 Masc n; isPron = False };
lock_NP = <>
};