comparison lisp/language/devan-util.el @ 49709:512864aab842

(devanagari-composable-pattern): Add DANDA character. (dev-char-glyph): Add an entry for DANDA.
author Kenichi Handa <handa@m17n.org>
date Tue, 11 Feb 2003 02:32:33 +0000
parents 003055ca7e13
children f961cd1cd732 d7ddb3e565de
comparison
equal deleted inserted replaced
49708:9155d2fdd73c 49709:512864aab842
51 (defconst devanagari-consonant 51 (defconst devanagari-consonant
52 "[$,15U(B-$,15y68(B-$,16?(B]") 52 "[$,15U(B-$,15y68(B-$,16?(B]")
53 53
54 (defconst devanagari-composable-pattern 54 (defconst devanagari-composable-pattern
55 (concat 55 (concat
56 "\\([$,15E(B-$,15T6@6A(B][$,15A5B(B]?\\)\\|$,15C(B" 56 "\\([$,15E(B-$,15T6@6A(B][$,15A5B(B]?\\)\\|[$,15C6D(B]"
57 "\\|\\(" 57 "\\|\\("
58 "\\(?:\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?" 58 "\\(?:\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?\\(?:[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?[$,15U(B-$,15y68(B-$,16?(B]$,16-(B\\)?"
59 "[$,15U(B-$,15y68(B-$,16?(B]\\(?:$,16-(B\\|[$,15~(B-$,16-6B6C(B]?[$,15B5A(B]?\\)?" 59 "[$,15U(B-$,15y68(B-$,16?(B]\\(?:$,16-(B\\|[$,15~(B-$,16-6B6C(B]?[$,15B5A(B]?\\)?"
60 "\\)") 60 "\\)")
61 "Regexp matching a composable sequence of Devanagari characters.") 61 "Regexp matching a composable sequence of Devanagari characters.")
408 ("$,15|(B" . "$,4"#(B") 408 ("$,15|(B" . "$,4"#(B")
409 ("$,15}(B" . "$,4 E(B") 409 ("$,15}(B" . "$,4 E(B")
410 ("$,16-(B" . "$,4""(B") 410 ("$,16-(B" . "$,4""(B")
411 ("$,16-5p(B" . "$,4"%(B") ;; following "r" 411 ("$,16-5p(B" . "$,4"%(B") ;; following "r"
412 ;; ("$,160(B" . "$,4 D(B") 412 ;; ("$,160(B" . "$,4 D(B")
413 ;; ("$,16D(B" . "$,4 J(B") 413 ("$,16D(B" . "$,4 J(B")
414 ;; ("$,16F(B" . "") 414 ;; ("$,16F(B" . "")
415 ;; ("$,16G(B" . "") 415 ;; ("$,16G(B" . "")
416 ;; ("$,16H(B" . "") 416 ;; ("$,16H(B" . "")
417 ;; ("$,16I(B" . "") 417 ;; ("$,16I(B" . "")
418 ;; ("$,16J(B" . "") 418 ;; ("$,16J(B" . "")