Mercurial > emacs
comparison lisp/language/sinhala.el @ 107906:3a8a36c9aede
Merge from mainline.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Tue, 30 Mar 2010 21:52:49 +0000 |
| parents | 9898924b98ed |
| children | 376148b31b5e |
comparison
equal
deleted
inserted
replaced
| 107905:eacc14a376e7 | 107906:3a8a36c9aede |
|---|---|
| 31 (documentation . t))) | 31 (documentation . t))) |
| 32 | 32 |
| 33 (set-char-table-range | 33 (set-char-table-range |
| 34 composition-function-table | 34 composition-function-table |
| 35 '(#xD80 . #xDFF) | 35 '(#xD80 . #xDFF) |
| 36 (list (vector "[\xD80-\xDFF\x200C\x200D]+" 0 'font-shape-gstring))) | 36 (list (vector |
| 37 ;; C:consonant, H:HALANT, J:ZWJ, v:vowel sign, | |
| 38 ;; V:independent vowel, a:ANUSVARA .. VISARGA | |
| 39 (concat | |
| 40 ;; C(HJC)*v*H?a?, or | |
| 41 "[\u0D9A-\u0DC6]\\(?:\u0DCA\u200D[\u0D9A-\u0DC6]\\)*[\u0DCF-\u0DDF\u0DF2-\u0DF3]*\u0DCA?[\u0D82-\u0D83]?\\|" | |
| 42 ;; Va?, or | |
| 43 "[\u0D85-\u0D96][\u0D82-\u0D83]?\\|" | |
| 44 ;; any other singleton characters | |
| 45 "[\u0D80-\u0DFF]") | |
| 46 0 'font-shape-gstring))) | |
| 37 | 47 |
| 38 ;; arch-tag: 87b9ad3b-5090-422f-b942-eb85b9d52e7c | 48 ;; arch-tag: 87b9ad3b-5090-422f-b942-eb85b9d52e7c |
| 39 ;; sinhala.el ends here | 49 ;; sinhala.el ends here |