Mercurial > emacs

comparison lisp/composite.el @ 56985:5eac7cd6d213

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(encode-composition-rule): Add autoload cooky.
author Kenichi Handa <handa@m17n.org>
date Wed, 08 Sep 2004 07:18:13 +0000
parents a5520bf073bb
children 6fb026ad601f cce1c0ee76ee
comparison
equal deleted inserted replaced
56984:ef2bf59ff39e 56985:5eac7cd6d213
75 | | new | 75 | | new |
76 | |glyph| 76 | |glyph|
77 +----+-----+ <--- new descent 77 +----+-----+ <--- new descent
78 ") 78 ")
79 79
80 ;; Encode composition rule RULE into an integer value. RULE is a cons 80
81 ;; of global and new reference point symbols. 81 ;;;###autoload
82 ;; This must be compatible with C macro COMPOSITION_ENCODE_RULE
83 ;; defined in composite.h.
84
85 (defun encode-composition-rule (rule) 82 (defun encode-composition-rule (rule)
83 "Encode composition rule RULE into an integer value.
84 RULE is a cons of global and new reference point symbols
85 \(see reference-point-alist)."
86
87 ;; This must be compatible with C macro COMPOSITION_ENCODE_RULE
88 ;; defined in composite.h.
89
86 (if (and (integerp rule) (< rule 144)) 90 (if (and (integerp rule) (< rule 144))
87 ;; Already encoded. 91 ;; Already encoded.
88 rule 92 rule
89 (or (consp rule) 93 (or (consp rule)
90 (error "Invalid composition rule: %S" rule)) 94 (error "Invalid composition rule: %S" rule))