From 987370fa2c9bdb7ae41b2b559b52436a1543deba Mon Sep 17 00:00:00 2001 From: handa Date: Thu, 16 Sep 2004 23:39:51 +0000 Subject: [PATCH] Fix reordering position of left part of vowels O, OO, AU. --- TML-CDAC.flt | 28 ++++++++++++++++++---------- 1 file changed, 18 insertions(+), 10 deletions(-) diff --git a/TML-CDAC.flt b/TML-CDAC.flt index 3548059..df9e896 100644 --- a/TML-CDAC.flt +++ b/TML-CDAC.flt @@ -69,25 +69,25 @@ (3 consonant) (4 dependent-vowel)) ("((CV)*)(C)(L)" - < + < | (4 dependent-vowel) (1 consonant-virama *) (3 consonant) - >) + | >) ("((CV)*)(C)(B)" - < + < | 0xAA (1 consonant-virama *) (3 consonant) (4 dependent-vowel) - >) + | >) ("((CV)*)(C)(b)" - < + < | 0xAB (1 consonant-virama *) (3 consonant) (4 dependent-vowel) - >) + | >) ("CV" < consonant-virama >) ("[RLBb]" @@ -202,9 +202,10 @@ ;; K: CONSONANT K ;; R: CONSONANT R ;; S: CONSONANT S' - ;; V: LIGATURE VOWEL (OR RIGHT PART OF VOWEL) (except for I) + ;; V: LIGATURE VOWEL (except for I,i) ;; I: DEPENDENT VOWEL I ;; i: DEPENDENT VOWEL I~ + ;; L: LEFT PART OF VOWEL ;; v: VIRAMA ;; E: ELSE ;; @@ -217,15 +218,20 @@ (0xA4 ?I) ; i (0xA6 ?i) ; i~ (0xA7 0xA8 ?V) ; u, u~ + (0xAA 0xAC ?L) ) (generator (0 (cond - ("KvSv" 0x7A) - ("KvS[Ii]" + ;; 1 23 4 5 6 + (" (L)(([CKRS](v)?)*)(KvS)(.)? " + (2 = *) (1 =) (5 0xFE) (6 =)) + ;; 1 23 4 5 + (" (L)(([CKRS](v)?)*)([CKRS].?) " + (2 = *) (1 =) (5 = =)) + ("KvS[Iiv]?" ligature-ks) - ("KvS" 0xFE) ("[CKRS][IiV]" ligature = =) ("SvRi" 0xFF) @@ -237,6 +243,8 @@ (cond ((0xE8 0xA2 0xFB 0xA4) 0x56) ; ksi ((0xE8 0xA2 0xFB 0xA6) 0x72) ; ksi~ + ((0xE8 0xA2 0xFB 0xA2) 0x7A) ; ks + ((0xE8 0xA2 0xFB) 0xFE) ; ks )) (ligature -- 1.7.10.4