comparison lisp/language/indian.el @ 88414:fad0f879877f

Call define-coding-system instead of make-coding-system. All CCL program deleted.
author Kenichi Handa <handa@m17n.org>
date Fri, 01 Mar 2002 02:28:29 +0000
parents c7ffa58f9637
children dfa89e1b4c56
comparison
equal deleted inserted replaced
88413:418777d5ccd4 88414:fad0f879877f
27 ;; This file defines in-is13194 coding system and relationship between 27 ;; This file defines in-is13194 coding system and relationship between
28 ;; indian-glyph character-set and various CDAC fonts. 28 ;; indian-glyph character-set and various CDAC fonts.
29 29
30 ;;; Code: 30 ;;; Code:
31 31
32 (make-coding-system 32 (define-coding-system 'in-is13194-devanagari
33 'in-is13194 2 ?D 33 "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)."
34 "8-bit encoding for ASCII (MSB=0) and IS13194-Devanagari (MSB=1)." 34 :coding-type 'iso-2022
35 '(ascii indian-is13194 nil nil 35 :mnemonic ?D
36 nil ascii-eol) 36 :designation [ascii indian-is13194 nil nil]
37 '((safe-charsets ascii indian-is13194) 37 :charset-list '(ascii indian-is13194)
38 (post-read-conversion . in-is13194-post-read-conversion) 38 :post-read-conversion 'in-is13194-devanagari-post-read-conversion
39 (pre-write-conversion . in-is13194-pre-write-conversion))) 39 :pre-write-conversion 'in-is13194-devanagari-pre-write-conversion)
40
41 (define-coding-system-alias 'devanagari 'in-is13194-devanagari)
40 42
41 (defvar indian-script-table 43 (defvar indian-script-table
42 '[ 44 '[
43 devanagari 45 devanagari
44 sanskrit 46 sanskrit