;;
(0x200C ?N) ; ZWNJ
(0x200D ?J) ; ZWJ
+ (0x0964 ?E) ; DANDA
+ (0x0965 ?E) ; DOUBLE DANDA
(0x0A00 0x0A7F ?E) ; ELSE
(0x0A01 ?A) ; SIGN ADAK BINDI (above)
(0x0A02 ?A) ; SIGN BINDI (above)
(0x0A48 ?u) ; VOWEL SIGN AI (above)
(0x0A4B ?u) ; VOWEL SIGN OO (above)
(0x0A4C ?u) ; VOWEL SIGN AU (above)
- (0x0A4D ?H) ; SIGN VIRAMA (HARANT)
+ (0x0A4D ?H) ; SIGN VIRAMA (HALANT)
(0x0A59 0x0A5E ?C) ; LETTER KHHA .. LETTER FA
(0x0A70 ?A) ; TIPPI (above)
(0x0A7F ?X) ; internal use
;; A syllable without a vowel sign nor a vowel modifier.
("(([CRY]n?H)*[CRY]n?)(H)?"
- < | (0 move-base-Halant) | >)
+ < | move-base-Halant | >)
;; A syllable starting with an independent vowel.
("V[Aa]?"
*)
;; Move Halant on the base consonant to the tail.
- ;; 0x0A7F indicates the postion for above- or below Matra.
+ ;; 0x0A7F indicates the position for above- or below Matra.
(move-base-Halant
(cond
- ("(([CRY]n?H)*[CRY]n?)(H)(Y)"
+ ("(([CRY]n?H)*[CRY]n?)(H)(Y)$"
(1 = *)
0x0A7F
(4 =)
(3 =))
- ("(([CRY]n?H)*[CRY]n?)(H)(R)"
+ ("(([CRY]n?H)*[CRY]n?)(H)(R)$"
(1 = *)
(4 =)
(3 =)
0x0A7F)
- ("([CRY]n?H)*[CRY]n?H"
+ ("([CRY]n?H)*[CRY]n?H$"
= * 0x200C)
(".*"
= * 0x0A7F))))
(generator
(0
(cond
- (" ([^ ]*HN) "
+ (" ([^ ]*H)N "
(1 otf:guru=nukt))
(" ([^ ]*) "
(1 otf:guru=nukt,vatu,pstf,abvs,blws))