;ELC ;;; Compiled by pot@pot.cnuce.cnr.it on Tue Mar 18 15:47:02 2003 ;;; from file /home/pot/gnu/emacs-pretest.new/lisp/language/chinese.el ;;; in Emacs version 21.3 ;;; with bytecomp version 2.85.4.1 ;;; with all optimizations. ;;; This file contains multibyte non-ASCII characters ;;; and therefore cannot be loaded into Emacs 19. (if (and (boundp 'emacs-version) (< (aref emacs-version (1- (length emacs-version))) ?A) (or (and (boundp 'epoch::version) epoch::version) (string-lessp emacs-version "20"))) (error "`chinese.el' was compiled for Emacs 20 or later")) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (byte-code "\300\301\302\303\304\305\306&\210\307\310\301\"\210\300\311\302\303\312\313\314&\210\300\315\302\316\317\320\321&\210\307\322\315\"\210\307\323\315\"\210\307\324\315\"\210\307\325\315\"\210\307\326\315\"\210\300\327\330\331\332\333\334&\210\307\335\327\"\210\307\336\327\"\207" [make-coding-system iso-2022-cn 2 67 "ISO 2022 based 7bit encoding for Chinese GB and CNS (MIME:ISO-2022-CN)" (ascii (nil chinese-gb2312 chinese-cns11643-1) (nil chinese-cns11643-2) nil nil ascii-eol ascii-cntl seven locking-shift single-shift nil nil nil init-bol) ((safe-charsets ascii chinese-gb2312 chinese-cns11643-1 chinese-cns11643-2) (mime-charset . iso-2022-cn)) define-coding-system-alias chinese-iso-7bit iso-2022-cn-ext "ISO 2022 based 7bit encoding for Chinese GB and CNS (MIME:ISO-2022-CN-EXT)" (ascii (nil chinese-gb2312 chinese-cns11643-1) (nil chinese-cns11643-2) (nil chinese-cns11643-3 chinese-cns11643-4 chinese-cns11643-5 chinese-cns11643-6 chinese-cns11643-7) nil ascii-eol ascii-cntl seven locking-shift single-shift nil nil nil init-bol) ((safe-charsets ascii chinese-gb2312 chinese-cns11643-1 chinese-cns11643-2 chinese-cns11643-3 chinese-cns11643-4 chinese-cns11643-5 chinese-cns11643-6 chinese-cns11643-7) (mime-charset . iso-2022-cn-ext)) chinese-iso-8bit 99 "ISO 2022 based EUC encoding for Chinese GB2312 (MIME:GB2312)" (ascii chinese-gb2312 nil nil nil ascii-eol ascii-cntl nil nil nil nil) ((safe-charsets ascii chinese-gb2312) (mime-charset . gb2312)) cn-gb-2312 euc-china euc-cn cn-gb gb2312 chinese-hz 0 122 "Hz/ZW 7-bit encoding for Chinese GB2312 (MIME:HZ-GB-2312)" nil ((safe-charsets ascii chinese-gb2312) (mime-charset . hz-gb-2312) (post-read-conversion . post-read-decode-hz) (pre-write-conversion . pre-write-encode-hz)) hz-gb-2312 hz] 7) (defalias 'post-read-decode-hz #[(len) "`\301 \304\305\n\211 \\\"\306 !\210+\207" [last-coding-system-used buffer-modified-p pos len nil decode-hz-region set-buffer-modified-p] 4]) (defalias 'pre-write-encode-hz #[(from to) "p\304\305!q\210 ;\203 c\210\202\306 \n#\210\307\310\311d\"\210*\307\207" [buf from to last-coding-system-used generate-new-buffer " *temp*" insert-buffer-substring nil encode-hz-region 1] 4]) (byte-code "\304\305\306\307#\210\310\311\312\313\314\315\316&\210\317\320\311\"\210\317\321\311\"\210\322\302 B\323\302\324\325#\210\323\302\326\327\302\"#\210)\330\nB B\304\331\332\333#\210\304\334\335\336#\210\337\340!\207" [prog current-load-list ccl-encode-big5-font font-ccl-encoder-alist set-language-info-alist "Chinese-GB" ((charset chinese-gb2312 chinese-sisheng) (coding-system chinese-iso-8bit iso-2022-cn chinese-hz) (coding-priority chinese-iso-8bit chinese-big5 iso-2022-cn) (input-method . "chinese-py-punct") (features china-util) (sample-text . "Chinese (‘ÖБÎÄ,‘ÆՑͨ‘»°,‘ºº‘Óï) ‘Ä㑺Ã") (documentation . "Support for Chinese GB2312 character set.")) ("Chinese") make-coding-system chinese-big5 3 66 "BIG5 8-bit encoding for Chinese (MIME:Big5)" nil ((safe-charsets ascii chinese-big5-1 chinese-big5-2) (mime-charset . big5) (charset-origin-alist (chinese-big5-1 "BIG5" encode-big5-char) (chinese-big5-2 "BIG5" encode-big5-char))) define-coding-system-alias big5 cn-big5 [0 28 16889 33 33015 94 760 18265 33 1051 18 153 87 6280 49913 157 1849 161 65623 157 1371 16 63 87 64 516 87 98 22] put variable-documentation "CCL program to encode a Big5 code to code point of Big5 font." ccl-program-idx register-ccl-program "big5" "Chinese-BIG5" ((charset chinese-big5-1 chinese-big5-2) (coding-system chinese-big5 chinese-iso-7bit) (coding-priority chinese-big5 iso-2022-cn chinese-iso-8bit) (input-method . "chinese-py-punct-b5") (features china-util) (sample-text . "Cantonese (˜Çî˜Í¤,˜Îݘ°ª˜Èä) ˜ª¯˜½¨, ˜«¤˜©ð") (documentation . "Support for Chinese Big5 character set.")) ("Chinese") "Chinese-CNS" ((charset chinese-cns11643-1 chinese-cns11643-2 chinese-cns11643-3 chinese-cns11643-4 chinese-cns11643-5 chinese-cns11643-6 chinese-cns11643-7) (coding-system iso-2022-cn) (coding-priority iso-2022-cn chinese-big5 chinese-iso-8bit) (features china-util) (input-method . "chinese-cns-quick") (documentation . "Support for Chinese CNS character sets.")) ("Chinese") provide chinese] 7)