%PDF- %PDF-
Direktori : /usr/local/share/emacs/27.2/lisp/leim/quail/ |
Current File : //usr/local/share/emacs/27.2/lisp/leim/quail/lao.elc |
;ELC ;;; Compiled ;;; in Emacs version 27.2 ;;; with all optimizations. ;;; This file contains utf-8 non-ASCII characters, ;;; and so cannot be loaded into Emacs 22 or earlier. (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (string-lessp emacs-version "23") (error "`%s' was compiled for Emacs 23 or later" #$)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301!\210\300\302!\207" [require quail lao-util] 2) (defalias 'quail-lao-update-translation #[(control-flag) "\250\203 \305 !\306 !{\307\310\"\f\"\202 \311\312!!\207" [control-flag quail-overlay quail-current-str quail-current-key unread-command-events overlay-start overlay-end append substring compose-string quail-lookup-map-and-concat] 4]) #@252 Alist of key sequences vs the corresponding Lao string to input. This variable is for the input method "lao". If you change the value of this variable while quail/lao is already loaded, you need to re-load it to properly re-initialize related alists. (defvar lao-key-alist '(("!" . "1") ("\"" . "=") ("#" . "3") ("$" . "4") ("&" . "5") ("%" . "໌") ("'" . "ງ") ("(" . "7") (")" . "8") ("*" . "6") ("+" . ["ໍ່"]) ("," . "ມ") ("-" . "ຊ") ("." . "ໃ") ("/" . "ຝ") ("0" . "ຂ") ("1" . "ຢ") ("2" . "ຟ") ("3" . "ໂ") ("4" . "ຖ") ("5" . "ຸ") ("6" . "ູ") ("7" . "ຄ") ("8" . "ຕ") ("9" . "ຈ") (":" . "%") (";" . "ວ") ("<" . "ໝ") ("=" . "ໍ") (">" . "$") ("?" . ")") ("@" . "2") ("A" . ["ັ້"]) ("B" . ["ຶ້"]) ("C" . "ຯ") ("D" . ".") ("E" . ["ຳ້"]) ("F" . ",") ("G" . ":") ("H" . "໊") ("I" . "ຮ") ("J" . "໋") ("K" . "!") ("L" . "?") ("M" . "ໆ") ("N" . ["ື້"]) ("O" . "ໜ") ("P" . "ຽ") ("Q" . ["ົ້"]) ("R" . "_") ("S" . ";") ("T" . "+") ("U" . ["ີ້"]) ("V" . "x") ("W" . "0") ("X" . "(") ("Y" . ["ິ້"]) ("Z" . "\"") ("[" . "ບ") ("]" . "ລ") ("^" . "ຼ") ("_" . "9") ("`" . "ງ") ("a" . "ັ") ("b" . "ຶ") ("c" . "ແ") ("d" . "ກ") ("e" . "ຳ") ("f" . "ດ") ("g" . "ເ") ("h" . "້") ("i" . "ຣ") ("j" . "່") ("k" . "າ") ("l" . "ສ") ("m" . "ທ") ("n" . "ື") ("o" . "ນ") ("p" . "ຍ") ("q" . "ົ") ("r" . "ພ") ("s" . "ຫ") ("t" . "ະ") ("u" . "ີ") ("v" . "ອ") ("w" . "ໄ") ("x" . "ປ") ("y" . "ິ") ("z" . "ຜ") ("{" . "-") ("|" . ["ຫຼ"]) ("}" . "/") ("~" . "໌") ("\\0" . "໐") ("\\1" . "໑") ("\\2" . "໒") ("\\3" . "໓") ("\\4" . "໔") ("\\5" . "໕") ("\\6" . "໖") ("\\7" . "໗") ("\\8" . "໘") ("\\9" . "໙")) (#$ . 779)) (defconst lao-key-alist-vector (byte-code "\306\211\211\211\211\211\211\211\f \203\206 @A\nA;\2035 \307\nA\310H\301\"\202J \307\nA\310H\310H\301\"\nA\310\311\nA\310H!I\210 \312\267\202 \nB\202 \nA;\203h \n\fB\f\202 \n B\202 \n\fB\202 \n B \202 \nB\202 \313 \f \f&. \207" [lao-key-alist phonetic-type elt other-key-alist tone-key-alist voweltone-key-alist nil get-char-code-property 0 compose-string #s(hash-table size 5 test eq rehash-size 1.5 rehash-threshold 0.8125 purecopy t data (consonant 80 vowel-upper 89 vowel-lower 89 tone 111 semivowel-lower 118)) vector vowel-key-alist semivowel-key-alist consonant-key-alist tail] 9)) (defconst lao-consonant-key-alist (aref lao-key-alist-vector 0)) (defconst lao-semivowel-key-alist (aref lao-key-alist-vector 1)) (defconst lao-vowel-key-alist (aref lao-key-alist-vector 2)) (defconst lao-voweltone-key-alist (aref lao-key-alist-vector 3)) (defconst lao-tone-key-alist (aref lao-key-alist-vector 4)) (defconst lao-other-key-alist (aref lao-key-alist-vector 5)) (byte-code "\300\301!\210\302\303\304\305\306\307\310\306\211\211\211\310\211\211\311\310\306&\210\312\313\314!!\207" [makunbound lao-key-alist-vector quail-define-package "lao" "Lao" "ລ" t "Lao input method simulating Lao keyboard layout based on Thai TIS620" nil quail-lao-update-translation quail-install-map quail-map-from-table ((base-state (lao-consonant-key-alist . svt-state) lao-vowel-key-alist lao-voweltone-key-alist lao-tone-key-alist lao-other-key-alist) (svt-state (lao-semivowel-key-alist . v-state) (lao-vowel-key-alist . t-state) lao-voweltone-key-alist lao-tone-key-alist) (v-state (lao-vowel-key-alist . t-state)) (t-state lao-tone-key-alist))] 17)