comparison lisp/international/mule.el @ 88436:29c4241b5418

*** empty log message ***
author Kenichi Handa <handa@m17n.org>
date Tue, 05 Mar 2002 01:07:22 +0000
parents 418777d5ccd4
children 4f93848ba5a8
comparison
equal deleted inserted replaced
88435:72f73971423b 88436:29c4241b5418
122 If it is a vector, the format is [ CODE-1 CHAR-1 CODE-2 CHAR-2 ... ], 122 If it is a vector, the format is [ CODE-1 CHAR-1 CODE-2 CHAR-2 ... ],
123 where CODE-n is a code-point of the charset, and CHAR-n is the 123 where CODE-n is a code-point of the charset, and CHAR-n is the
124 corresponding charcter code. 124 corresponding charcter code.
125 125
126 If it is a string, it is a name of file that contains the above 126 If it is a string, it is a name of file that contains the above
127 information. 127 information. Each line of the file must be this format:
128 0xXXX 0xYYY
129 where XXX is a hexadecimal representation of CODE-n and YYY is a
130 hexadecimal representation of CHAR-n. A line starting with `#' is a
131 comment line.
128 132
129 `:parents' 133 `:parents'
130 134
131 VALUE must be a list of parent charsets. The charset inherits 135 VALUE must be a list of parent charsets. The charset inherits
132 characters from them. Each element of the list may be a cons (PARENT 136 characters from them. Each element of the list may be a cons (PARENT
138 142
139 VALUE must be vector or string. 143 VALUE must be vector or string.
140 144
141 If it is a vector, the format is [ CODE-1 CHAR-1 CODE-2 CHAR-2 ... ], 145 If it is a vector, the format is [ CODE-1 CHAR-1 CODE-2 CHAR-2 ... ],
142 where CODE-n is a code-point of the charset, and CHAR-n is the 146 where CODE-n is a code-point of the charset, and CHAR-n is the
143 corresponding unified charcter code. 147 corresponding Unicode charcter code.
144 148
145 If it is a string, it is a name of file that contains the above 149 If it is a string, it is a name of file that contains the above
146 information." 150 information. The file format is the same as what described for `:map'
151 attribute."
147 (let ((attrs (mapcar 'list '(:dimension 152 (let ((attrs (mapcar 'list '(:dimension
148 :code-space 153 :code-space
149 :iso-final-char 154 :iso-final-char
150 :iso-revision-number 155 :iso-revision-number
151 :emacs-mule-id 156 :emacs-mule-id