82 |
be a cons (HIGH . LOW), where HIGH is the most significant 16 bits of |
be a cons (HIGH . LOW), where HIGH is the most significant 16 bits of |
83 |
the code point and LOW is the least significant 16 bits. |
the code point and LOW is the least significant 16 bits. |
84 |
|
|
85 |
`max-code' |
`:max-code' |
86 |
|
|
87 |
VALUE must be an integer specifying the maxinum code point of the |
VALUE must be an integer specifying the maxinum code point of the |
88 |
charset. If omitted, it is calculated from `:code-space'. VALUE may |
charset. If omitted, it is calculated from `:code-space'. VALUE may |
306 |
(plist-get (charset-plist charset) propname)) |
(plist-get (charset-plist charset) propname)) |
307 |
|
|
308 |
(defun put-charset-property (charset propname value) |
(defun put-charset-property (charset propname value) |
309 |
"Store CHARSETS's PROPNAME property with value VALUE. |
"Set CHARSETS's PROPNAME property to value VALUE. |
310 |
It can be retrieved with `(get-charset-property CHARSET PROPNAME)'." |
It can be retrieved with `(get-charset-property CHARSET PROPNAME)'." |
311 |
(set-charset-plist charset |
(set-charset-plist charset |
312 |
(plist-put (charset-plist charset) propname value))) |
(plist-put (charset-plist charset) propname value))) |
1107 |
;; Must return nil, as build_annotations_2 expects that. |
;; Must return nil, as build_annotations_2 expects that. |
1108 |
nil) |
nil) |
1109 |
|
|
1110 |
(make-obsolete 'set-coding-priority 'set-coding-system-priority "22.0") |
(make-obsolete 'set-coding-priority 'set-coding-system-priority "22.1") |
1111 |
|
|
1112 |
;;; FILE I/O |
;;; FILE I/O |
1113 |
|
|