procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions
emacs/lisp/language/tibetan.el

614 lines
18 KiB
EmacsLisp
Raw Normal View History

Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;;; tibetan.el --- support for Tibetan language -*- coding: utf-8-emacs; -*-
Initial revision
1997-04-05 02:44:02 +00:00
Update copyright year to 2017 Run admin/update-copyright.
2017-01-01 03:14:01 +00:00
;; Copyright (C) 1997, 2001-2017 Free Software Foundation, Inc.
Add 2008 to copyright years.
2008-01-07 01:33:37 +00:00
;; Copyright (C) 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005,
Add 2011 to FSF/AIST copyright years.
2011-01-02 15:50:46 -08:00
;; 2006, 2007, 2008, 2009, 2010, 2011
Fix copyrights.
2005-05-16 07:03:28 +00:00
;; National Institute of Advanced Industrial Science and Technology (AIST)
;; Registration Number H14PRO021
*** empty log message ***
2003-09-08 12:53:41 +00:00
;; Copyright (C) 2003
;; National Institute of Advanced Industrial Science and Technology (AIST)
;; Registration Number H13PRO009
Initial revision
1997-04-05 02:44:02 +00:00
Comments (minor fixes of some header conventions).
2009-01-10 21:50:40 +00:00
;; Author: Toru TOMABECHI <Toru.Tomabechi@orient.unil.ch>
;; Created: Feb. 17. 1997
*** empty log message ***
2003-09-08 12:53:41 +00:00
;; Keywords: multilingual, Tibetan, i18n
Initial revision
1997-04-05 02:44:02 +00:00
;; This file is part of GNU Emacs.
Switch to recommended form of GPLv3 permissions notice.
2008-05-06 04:29:13 +00:00
;; GNU Emacs is free software: you can redistribute it and/or modify
Initial revision
1997-04-05 02:44:02 +00:00
;; it under the terms of the GNU General Public License as published by
Switch to recommended form of GPLv3 permissions notice.
2008-05-06 04:29:13 +00:00
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
Initial revision
1997-04-05 02:44:02 +00:00
;; GNU Emacs is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
Switch to recommended form of GPLv3 permissions notice.
2008-05-06 04:29:13 +00:00
;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>.
Initial revision
1997-04-05 02:44:02 +00:00
Comments (minor fixes of some header conventions).
2009-01-10 21:50:40 +00:00
;;; History:
Initial revision
1997-04-05 02:44:02 +00:00
Spelling fixes.
2011-11-24 23:14:48 -08:00
;; 1997.03.13 Modification for special signs and punctuation.
Initial revision
1997-04-05 02:44:02 +00:00
Some fixes to follow coding conventions.
2001-07-16 12:23:00 +00:00
;;; Commentary:
Initial revision
1997-04-05 02:44:02 +00:00
;;; Code:
;;; Tibetan Character set.
;;; \x2130 -- \x234a is a subset of Unicode v.2 \x0f00 - \x0fb9
;;; with a slight modification. And there are some subjoined
;;; consonants which are not specified in Unicode.
;;; I hope I can add missing characters later.
;;;
;;; 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;;;2120 // <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; obsolete glyphs (2123-5)
;;;2130 ༀ ༁ ༂ ༃ ༄ ༅ ༆ ༇ ༈ ༉ ༊ ་ ༌ ། ༎ ༏ ; Punctuation,
;;;2140 ༐ ༑ ༒ ༓ ༔ ༕ ༖ ༗ ༘ ༙ ༚ ༛ ༜ ༝ ༞ ༟ ; Digits and
;;;2150 ༠ ༡ ༢ ༣ ༤ ༥ ༦ ༧ ༨ ༩ ༪ ༫ ༬ ༭ ༮ ༯ ; Special signs.
;;;2160 ༰ ༱ ༲ ༳ ༴ ༵ ༶ ༷ ༸ ༹ ༺ ༻ ༼ ༽ ༾ ༿ ;
;;;2170 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> // ;
Initial revision
1997-04-05 02:44:02 +00:00
;;;
;;; 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;;;2220 // ཀ ཁ ག གྷ ང ཅ ཆ ཇ <20><><EFBFBD><EFBFBD> ཉ ཊ ཋ ཌ ཌྷ ཎ ; Base consonants
;;;2230 ཏ ཐ ད དྷ ན པ ཕ བ བྷ མ ཙ ཚ ཛ ཛྷ ཝ ཞ ; and
;;;2240 ཟ འ ཡ ར ལ ཤ ཥ ས ཧ ཨ ཀྵ ཪ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; Vowel signs.
;;;2250 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ཱ ི ཱི ུ ཱུ ྲྀ ཷ ླྀ ཹ ེ ཻ ོ ཽ ཾ ; (\x2251 = vowel a)
;;;2260 ཿ ྀ ཱྀ ྂ ྃ ྄ ྅ ྆ ྇ ྈ ྉ ྊ ྋ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; Long vowels and
;;;2270 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> // ; vocalic r, l ARE
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
;;; ; atomically
Trailing whitepace deleted.
2003-02-04 13:24:35 +00:00
;;; ; encoded.
Initial revision
1997-04-05 02:44:02 +00:00
;;; 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;;;2320 // ྐ ྑ ྒ ྒྷ ྔ ྕ ྖ ྗ <20><><EFBFBD><EFBFBD> ྙ ྚ ྛ ྜ ྜྷ ྞ ; Subjoined consonants
;;;2330 ྟ ྠ ྡ ྡྷ ྣ ྤ ྥ ྦ ྦྷ ྨ ྩ ྪ ྫ ྫྷ ྭ ྮ ;
;;;2340 ྯ ྰ ྱ ྲ ླ ྴ ྵ ྶ ྷ ྸ ྐྵ ྺ ྻ ྼ <20><><EFBFBD><EFBFBD> ྾ ;
;;;2350 ྿ ࿀ ࿁ ࿂ ࿃ ࿄ ࿅ ࿆ ࿇ ࿈ ࿉ ࿊ ࿋ ࿌ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; Hereafter, the chars
;;;2360 ࿏ <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; are not specified
;;;2370 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> // ; in Unicode.
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
;;;
Initial revision
1997-04-05 02:44:02 +00:00
;;; 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;;;2420 // <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; Precomposed
;;;2430 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; consonants for
;;;2440 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; ordinary Tibetan.
;;;2450 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; They are decomposed
;;;2460 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; into base and
;;;2470 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> // ; subjoined consonants
Initial revision
1997-04-05 02:44:02 +00:00
;;; ; when written on a
;;; 00 01 02 03 04 05 06 07 08 09 0A 0B 0C 0D 0E 0F ; file in Tibetan
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;;;2520 // <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ; coding system.
;;;2530 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ;
;;;2540 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ;
;;;2550 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ;
;;;2560 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> ;
;;;2570 <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> // ;
Initial revision
1997-04-05 02:44:02 +00:00
;;;
Call define-coding-system instead of make-coding-system. All CCL program deleted.
2002-03-01 02:28:29 +00:00
(define-coding-system 'tibetan-iso-8bit
"8-bit encoding for ASCII (MSB=0) and TIBETAN (MSB=1)."
:coding-type 'iso-2022
:mnemonic ?Q
:designation [ascii tibetan nil nil]
:charset-list '(ascii tibetan))
Initial revision
1997-04-05 02:44:02 +00:00
Adjusted for the change of make-coding-system. Register coding-priority key in language-info-alist.
1998-01-22 01:46:28 +00:00
(define-coding-system-alias 'tibetan 'tibetan-iso-8bit)
Initial revision
1997-04-05 02:44:02 +00:00
(set-language-info-alist
("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change the value to setup-XXX-environment-internal. Add properties nonascii-translation, input-method, features, unibyte-syntax, and unibyte-display.
1998-08-10 06:29:02 +00:00
"Tibetan" '((charset tibetan tibetan-1-column)
Adjusted for the change of make-coding-system. Register coding-priority key in language-info-alist.
1998-01-22 01:46:28 +00:00
(coding-system tibetan-iso-8bit)
(coding-priority iso-2022-7bit tibetan-iso-8bit)
("LANUGAGE-ENVIRONMENT"): Delete property setup-function or change the value to setup-XXX-environment-internal. Add properties nonascii-translation, input-method, features, unibyte-syntax, and unibyte-display.
1998-08-10 06:29:02 +00:00
(input-method . "tibetan-wylie")
(features tibet-util)
Initial revision
1997-04-05 02:44:02 +00:00
(documentation . t)
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
(sample-text . "Tibetan (བོད་སྐ<E0BDA6><E0BE90><EFBFBD><EFBFBD>ད་) ༄༅༅༎བཀྲ<E0BD80><E0BEB2><EFBFBD><EFBFBD>་ཤིས་བདེ་ལེགས༎ཨོཾ་མ<E0BC8B><E0BD98><EFBFBD><EFBFBD>་ཎི་པ<E0BC8B><E0BD94><EFBFBD><EFBFBD>དྨེ་ཧའུྂ༎")))
Initial revision
1997-04-05 02:44:02 +00:00
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;; `འ' is included in the pattern for subjoined consonants because we
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
;; treat it specially in tibetan-add-components.
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
;; modified by Tomabechi 1999/12/10
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; modified by Tomabechi 2000/06/08
;; To allow infinite addition of vowels/modifiers
;; as specified in Unicode v.3
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;; འ is removed from the class of subjoined. Tomabechi 2000/06/08
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; (for Unicode support)
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
(defconst tibetan-composable-pattern
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
"[ཀ-ཀྵཪ][ྐ-ྐྵྺྻྼ]*[཰<><E0BDB0><EFBFBD><EFBFBD>ཱི-྄ཱཽྀྀ]*[ཾྂྃ྆-ྋ༙༵༷]*"
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
"Regexp matching a composable sequence of Tibetan characters.")
Initial revision
1997-04-05 02:44:02 +00:00
;;;
;;; Definitions of conversion data.
;;;
;;; alists for tibetan char <-> transcription conversion
;;; longer transcription should come first
(defconst tibetan-consonant-transcription-alist
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
'(("tsh" . "ཚ")
("dzh" . "ཛྷ")
("kSH" . "ཀྵ")
("kh" . "ཁ")
("gh" . "གྷ")
("ng" . "ང")
("ch" . "ཆ")
("ny" . "ཉ")
("TH" . "ཋ")
("DH" . "ཌྷ")
("th" . "ཐ")
("dh" . "དྷ")
("ph" . "ཕ")
("bh" . "བྷ")
("ts" . "ཙ")
("dz" . "ཛ")
("zh" . "ཞ")
("sh" . "ཤ")
("SH" . "ཥ")
("k" . "ཀ")
("g" . "ག")
("c" . "ཅ")
("j" . "ཇ")
("T" . "ཊ")
("D" . "ཌ")
("N" . "ཎ")
("t" . "ཏ")
("d" . "ད")
("n" . "ན")
("p" . "པ")
("b" . "བ")
("m" . "མ")
("w" . "ཝ")
("z" . "ཟ")
("'" . "འ")
("y" . "ཡ")
("r" . "ར")
("l" . "ལ")
("s" . "ས")
("h" . "ཧ")
("H" . "ཧ")
("A" . "ཨ")
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
;; Added by Tomabechi 1999/12/10
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("R" . "ཪ") ;; fixed form RA
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
))
Initial revision
1997-04-05 02:44:02 +00:00
(defconst tibetan-vowel-transcription-alist
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
'(
;; Composite Vowels
;; Added by Tomabechi 2000/06/08
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("frr" . "ཷ")
("fll" . "ཹ")
("fa" . "ཱ")
("fi" . "ཱི")
("fu" . "ཱུ")
("fr" . "ྲྀ")
("fl" . "ླྀ")
("fI" . "ཱྀ")
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; Normal Vowels
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ai" . "ཻ")
("au" . "ཽ")
("ee" . "ཻ")
("oo" . "ཽ")
("a" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>") ; invisible vowel sign (\x2251)
("i" . "ི")
("u" . "ུ")
("e" . "ེ")
("o" . "ོ")
("E" . "ཻ")
("O" . "ཽ")
("I" . "ྀ")
("," . "྄") ; idem.
Initial revision
1997-04-05 02:44:02 +00:00
))
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
(defconst tibetan-modifier-transcription-alist
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
'(("M" . "ཾ")
("~" . "ྂ")
("`" . "ྃ")
("x" . "ྈ")
("X" . "ྉ")
("v" . "྆")
("V" . "྇")
("q" . "ྊ")
("Q" . "ྋ")
("_/" . "༙")
("_o" . "༷")
("_O" . "༵")))
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
Initial revision
1997-04-05 02:44:02 +00:00
(defconst tibetan-precomposed-transcription-alist
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
'(("phyw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("tshw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rtsw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("khw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("nyw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("tsw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("zhw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("shw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("khy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("phy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("khr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("thr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("phr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("shr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("dzr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("grw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rng" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rny" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rts" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rdz" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rgw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rky" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rgy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rmy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lng" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sng" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sny" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sts" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sky" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sgy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("spy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sby" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("smy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("skr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sgr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("snr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("spr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sbr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("smr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("kw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("gw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("cw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("tw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("dw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("zw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("hw" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ky" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("gy" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("py" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("by" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("my" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("kr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("gr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("tr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("dr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("pr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brk" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brg" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brng" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brj" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brny" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brt" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brd" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brn" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brts" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brdz" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("brl" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("br" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("mr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("hr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("jr" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("kl" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("gl" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("blt" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("bld" . "བ<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("bl" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("zl" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rl" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sl" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rk" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rg" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rj" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rt" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rd" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rn" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rb" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("rm" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lk" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lg" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lc" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lj" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lt" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ld" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ln" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>") ; dummy \x2121
("lp" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lb" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("lh" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sk" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sg" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("st" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sd" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sn" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sp" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sb" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("sm" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>"))
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
)
Initial revision
1997-04-05 02:44:02 +00:00
(defconst tibetan-subjoined-transcription-alist
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
(sort '(("+k" . "ྐ")
("+kh" . "ྑ")
("+g" . "ྒ")
("+gh" . "ྒྷ")
("+ng" . "ྔ")
("+c" . "ྕ")
("+ch" . "ྖ")
("+j" . "ྗ")
("+ny" . "ྙ")
("+T" . "ྚ")
("+TH" . "ྛ")
("+D" . "ྜ")
("+DH" . "ྜྷ")
("+N" . "ྞ")
("+t" . "ྟ")
("+th" . "ྠ")
("+d" . "ྡ")
("+dh" . "ྡྷ")
("+n" . "ྣ")
("+p" . "ྤ")
("+ph" . "ྥ")
("+b" . "ྦ")
("+bh" . "ྦྷ")
("+m" . "ྨ")
("+ts" . "ྩ")
("+tsh" . "ྪ")
("+dz" . "ྫ")
("+dzh" . "ྫྷ")
("+w" . "ྭ")
("+zh" . "ྮ")
("+z" . "ྯ")
("+'" . "ྰ")
("+y" . "ྱ")
("+r" . "ྲ")
("+l" . "ླ")
("+sh" . "ྴ")
("+SH" . "ྵ")
("+s" . "ྶ")
("+h" . "ྷ")
("+A" . "ྸ")
("+kSH" . "ྐྵ")
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
;; Added by Tomabechi 1999/12/10
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("+W" . "ྺ") ;; fixed form subscribed WA
("+Y" . "ྻ") ;; fixed form subscribed YA
("+R" . "ྼ") ;; fixed form subscribed RA
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
)
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
(lambda (x y) (> (length (car x)) (length (car y))))))
Initial revision
1997-04-05 02:44:02 +00:00
;;;
;;; alist for Tibetan base consonant <-> subjoined consonant conversion.
;;;
(defconst tibetan-base-to-subjoined-alist
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
'(("ཀ" . "ྐ")
("ཁ" . "ྑ")
("ག" . "ྒ")
("གྷ" . "ྒྷ")
("ང" . "ྔ")
("ཅ" . "ྕ")
("ཆ" . "ྖ")
("ཇ" . "ྗ")
("ཉ" . "ྙ")
("ཊ" . "ྚ")
("ཋ" . "ྛ")
("ཌ" . "ྜ")
("ཌྷ" . "ྜྷ")
("ཎ" . "ྞ")
("ཏ" . "ྟ")
("ཐ" . "ྠ")
("ད" . "ྡ")
("དྷ" . "ྡྷ")
("ན" . "ྣ")
("པ" . "ྤ")
("ཕ" . "ྥ")
("བ" . "ྦ")
("བྷ" . "ྦྷ")
("མ" . "ྨ")
("ཙ" . "ྩ")
("ཚ" . "ྪ")
("ཛ" . "ྫ")
("ཛྷ" . "ྫྷ")
("ཝ" . "ྭ")
("ཞ" . "ྮ")
("ཟ" . "ྯ")
("འ" . "ྰ")
("ཡ" . "ྱ")
("ར" . "ྲ")
("ལ" . "ླ")
("ཤ" . "ྴ")
("ཥ" . "ྵ")
("ས" . "ྶ")
("ཧ" . "ྷ")
("ཨ" . "ྸ")
("ཀྵ" . "ྐྵ")
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
;; Added by Tomabechi 1999/12/10
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ཪ" . "ྼ") ;; Fixed form RA (224B->234D)
(tibetan-composable-pattern): More characters included. (tibetan-consonant-transcription-alist): Rule for "R" added. (tibetan-subjoined-transcription-alist): Rules for "+W", "+Y", and "+R" added. (tibetan-base-to-subjoined-alist): Rule for "RA" added.
2000-06-01 11:02:58 +00:00
))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;;; alist for Tibetan composite vowels (long i, vocalic r, etc.)
Spelling fixes.
2011-11-22 23:03:56 -08:00
;;; New variable. created by Tomabechi 2000/06/08
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
(defconst tibetan-composite-vowel-alist
'(;; LONG A
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
;; ("ཱ" . ((bc . tc) ?ཱ))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; LONG I
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ཱི" . (?ཱ (tc . bc) ?ི))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; LONG U
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ཱུ" . (?ཱ (bc . tc) ?ུ))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; VOCALIC R
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ྲྀ" . (?ྲ (tc . bc) ?ྀ))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; LONG VOCALIC R
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ཷ" . (?ྲ (bc . tc) ?ཱ (tc . bc) ?ྀ))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; VOCALIC L
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ླྀ" . (?ླ (tc . bc) ?ྀ))
;;་LONG VOCALIC L
("ཹ" . (?ླ (bc . tc) ?ཱ (tc . bc) ?ྀ))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
;; LONG REVERSE I
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
("ཱྀ" . (?ཱ (tc . bc) ?ྀ))
(tibetan-composable-pattern): Fix previous change. (tibetan-vowel-transcription-alist): More rules added. (tibetan-composite-vowel-alist): New variable. (tibetan-precomposition-rule-alist): More rules added.
2000-06-12 06:51:13 +00:00
))
Initial revision
1997-04-05 02:44:02 +00:00
;;;
;;; alist for Tibetan consonantic components <-> precomposed glyph conversion.
;;; (includes some punctuation conversion rules)
;;;
(defconst tibetan-precomposition-rule-alist
Use UTF-8 for most files with non-ASCII characters. * admin/notes/unicode (etc/tutorials/TUTORIAL.ko, leim/quail/hanja.el) (leim/quail/hanja3.el, leim/quail/symbol-ksc.el): Now utf-8, not iso-2022-7bit. Also, files that contain non-UTF-8 characters are now encoded in utf-8-emacs, not iso-2022-7bit. * etc/tutorials/TUTORIAL.ko, tutorials/TUTORIAL.th: Switch from iso-2022-7bit to utf-8. * leim/quail/cyrillic.el, leim/quail/czech.el, leim/quail/ethiopic.el: * leim/quail/greek.el, leim/quail/hanja.el, leim/quail/hanja3.el: * leim/quail/hebrew.el, leim/quail/lao.el, leim/quail/lrt.el: * leim/quail/slovak.el, leim/quail/symbol-ksc.el, leim/quail/thai.el: * leim/quail/tibetan.el, leim/quail/viqr.el, leim/quail/vntelex.el: * leim/quail/vnvni.el, leim/quail/welsh.el: * lisp/international/latin1-disp.el, lisp/international/mule-util.el: * lisp/language/cyril-util.el, lisp/language/european.el: * lisp/language/ind-util.el, lisp/language/lao-util.el, lisp/language/thai.el: * lisp/language/tibet-util.el, lisp/language/tibetan.el: * lisp/language/viet-util.el: Switch from iso-2022-7bit to utf-8 or (if needed) utf-8-emacs. Fixes: debbugs:13936
2013-04-01 18:18:40 -07:00
`(("ཕྱྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("གྲྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཚྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྩྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྒྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྐྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྒྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྨྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྐྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྒྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྤྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྦྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྨྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྐྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྒྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྣྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྤྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྦྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྨྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཁྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཉྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཙྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཞྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཤྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཁྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཕྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཁྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཐྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཕྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཤྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཛྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྔ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྙ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྩ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྫ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྔ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྔ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྙ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྩ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཀྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("གྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཅྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཏྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("དྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཟྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཧྭ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཀྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("གྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("པྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("བྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("མྱ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཀྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("གྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཏྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("དྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("པྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("བྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("མྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཧྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཇྲ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཀླ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("གླ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("བླ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ཟླ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རླ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སླ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྐ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྒ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྗ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྟ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྡ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྣ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྦ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("རྨ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྐ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྒ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྣ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>") ; dummy 0x2121 added 2000/06/08 for transition l -> lng
("ལྕ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྗ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྟ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྡ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྤ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྦ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("ལྷ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྐ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྒ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྟ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྡ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྣ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྤ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྦ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")
("སྨ" . "<EFBFBD><EFBFBD><EFBFBD><EFBFBD>")))
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
(defconst tibetan-regexp
(let ((l (list tibetan-precomposed-transcription-alist
tibetan-consonant-transcription-alist
tibetan-vowel-transcription-alist
tibetan-modifier-transcription-alist
tibetan-subjoined-transcription-alist))
(separator "\\|")
tail pattern)
Initial revision
1997-04-05 02:44:02 +00:00
(while l
Register tibetan-composition-function in composition-function-table. (tibetan-composable-pattern): New variable. (tibetan-subjoined-transcription-alist): Change key "R" to "+R". (tibetan-precomposition-rule-alist): Move punctuations to tibetan-punctuation-transcription-alist and tibetan-obsolete-glyphs. (tibetan-punctuation-transcription-alist): New variable. (tibetan-obsolete-glyphs): New variable. (tibetan-regexp): Improve the initialization code.
1999-12-15 00:50:58 +00:00
(setq tail (car l) l (cdr l))
(while tail
(setq pattern (cons separator (cons (car (car tail)) pattern))
tail (cdr tail))))
(apply 'concat (nreverse (cdr pattern))))
"Regexp matching a Tibetan transcription of a composable Tibetan sequence.
The result of matching is to be used for indexing alists at conversion
from a roman transcription to the corresponding Tibetan character.")
Initial revision
1997-04-05 02:44:02 +00:00
(defvar tibetan-precomposed-regexp
* puresize.h (BASE_PURESIZE): Increase to 1470000. * lread.c (Fload): Purecopy the file name when building Vpreloaded_file_list. * textmodes/ispell.el (ispell-skip-region-alist): * international/mule-conf.el (eight-bit): * international/fontset.el (font-encoding-alist): * startup.el (pure-space-overflow-message): * simple.el (overwrite-mode-textual, overwrite-mode-binary): * paths.el (gnus-nntp-service, rmail-spool-directory) (term-file-prefix): * files.el (save-some-buffers-action-alist): * cmuscheme.el (same-window-buffer-names): * ielm.el (same-window-buffer-names): * shell.el (same-window-buffer-names): * mail/sendmail.el (same-window-buffer-names): * progmodes/inf-lisp.el (same-window-buffer-names): * bindings.el (mode-line-client) (mode-line-column-line-number-mode-map): * language/tibetan.el (tibetan-precomposition-rule-regexp) (tibetan-precomposed-regexp): Purecopy string arguments.
2009-10-30 02:00:11 +00:00
(purecopy
Initial revision
1997-04-05 02:44:02 +00:00
(let ((l tibetan-precomposed-transcription-alist)
temp)
(setq temp "^\\(")
(setq temp
(concat temp (car (car l))))
(setq l (cdr l))
(while l
(setq temp
(concat temp "\\|" (car (car l))))
(setq l (cdr l)))
* puresize.h (BASE_PURESIZE): Increase to 1470000. * lread.c (Fload): Purecopy the file name when building Vpreloaded_file_list. * textmodes/ispell.el (ispell-skip-region-alist): * international/mule-conf.el (eight-bit): * international/fontset.el (font-encoding-alist): * startup.el (pure-space-overflow-message): * simple.el (overwrite-mode-textual, overwrite-mode-binary): * paths.el (gnus-nntp-service, rmail-spool-directory) (term-file-prefix): * files.el (save-some-buffers-action-alist): * cmuscheme.el (same-window-buffer-names): * ielm.el (same-window-buffer-names): * shell.el (same-window-buffer-names): * mail/sendmail.el (same-window-buffer-names): * progmodes/inf-lisp.el (same-window-buffer-names): * bindings.el (mode-line-client) (mode-line-column-line-number-mode-map): * language/tibetan.el (tibetan-precomposition-rule-regexp) (tibetan-precomposed-regexp): Purecopy string arguments.
2009-10-30 02:00:11 +00:00
(concat temp "\\)")))
Initial revision
1997-04-05 02:44:02 +00:00
"Regexp string to match a romanized Tibetan complex consonant.
The result of matching is to be used for indexing alists when the input key
from an input method is converted to the corresponding precomposed glyph.")
(defvar tibetan-precomposition-rule-regexp
* puresize.h (BASE_PURESIZE): Increase to 1470000. * lread.c (Fload): Purecopy the file name when building Vpreloaded_file_list. * textmodes/ispell.el (ispell-skip-region-alist): * international/mule-conf.el (eight-bit): * international/fontset.el (font-encoding-alist): * startup.el (pure-space-overflow-message): * simple.el (overwrite-mode-textual, overwrite-mode-binary): * paths.el (gnus-nntp-service, rmail-spool-directory) (term-file-prefix): * files.el (save-some-buffers-action-alist): * cmuscheme.el (same-window-buffer-names): * ielm.el (same-window-buffer-names): * shell.el (same-window-buffer-names): * mail/sendmail.el (same-window-buffer-names): * progmodes/inf-lisp.el (same-window-buffer-names): * bindings.el (mode-line-client) (mode-line-column-line-number-mode-map): * language/tibetan.el (tibetan-precomposition-rule-regexp) (tibetan-precomposed-regexp): Purecopy string arguments.
2009-10-30 02:00:11 +00:00
(purecopy
Initial revision
1997-04-05 02:44:02 +00:00
(let ((l tibetan-precomposition-rule-alist)
temp)
(setq temp "\\(")
(setq temp (concat temp (car (car l))))
(setq l (cdr l))
(while l
(setq temp (concat temp "\\|" (car (car l))))
(setq l (cdr l)))
* puresize.h (BASE_PURESIZE): Increase to 1470000. * lread.c (Fload): Purecopy the file name when building Vpreloaded_file_list. * textmodes/ispell.el (ispell-skip-region-alist): * international/mule-conf.el (eight-bit): * international/fontset.el (font-encoding-alist): * startup.el (pure-space-overflow-message): * simple.el (overwrite-mode-textual, overwrite-mode-binary): * paths.el (gnus-nntp-service, rmail-spool-directory) (term-file-prefix): * files.el (save-some-buffers-action-alist): * cmuscheme.el (same-window-buffer-names): * ielm.el (same-window-buffer-names): * shell.el (same-window-buffer-names): * mail/sendmail.el (same-window-buffer-names): * progmodes/inf-lisp.el (same-window-buffer-names): * bindings.el (mode-line-client) (mode-line-column-line-number-mode-map): * language/tibetan.el (tibetan-precomposition-rule-regexp) (tibetan-precomposed-regexp): Purecopy string arguments.
2009-10-30 02:00:11 +00:00
(concat temp "\\)")))
Initial revision
1997-04-05 02:44:02 +00:00
"Regexp string to match a sequence of Tibetan consonantic components, i.e.,
one base consonant and one or more subjoined consonants.
The result of matching is to be used for indexing alist when the component
sequence is converted to the corresponding precomposed glyph.
This also matches some punctuation characters which need conversion.")
(defvar tibetan-decomposed nil)
(defvar tibetan-decomposed-temp nil)
Register tibetan-composition-function in composition-function-table for Tibetan characters.
2002-11-07 06:32:49 +00:00
;; For automatic composition.
Spelling fixes.
2011-11-22 23:03:56 -08:00
(set-char-table-range
Fix setting of composition-function-table.
2008-09-05 01:01:02 +00:00
composition-function-table '(#xF00 . #xFD1)
(list (vector tibetan-composable-pattern 0 'font-shape-gstring)))
Register tibetan-composition-function in composition-function-table for Tibetan characters.
2002-11-07 06:32:49 +00:00
Use provide.
2000-11-22 19:28:28 +00:00
(provide 'tibetan)
Some fixes to follow coding conventions.
2001-07-16 12:23:00 +00:00
;;; tibetan.el ends here
Reference in a new issue Copy permalink