Mercurial > emacs

comparison src/ccl.c @ 46276:375e343422ef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(HASH_VALUE): Remove (it's in lisp.h now).
author Stefan Monnier <monnier@iro.umontreal.ca>
date Tue, 09 Jul 2002 23:00:17 +0000
parents 48b34872db42
children 40db0673e6f0
comparison
equal deleted inserted replaced
46275:0d5f7cc6ce91 46276:375e343422ef
69 Lisp_Object Vtranslation_hash_table_vector; 69 Lisp_Object Vtranslation_hash_table_vector;
70 70
71 /* Return a hash table of id number ID. */ 71 /* Return a hash table of id number ID. */
72 #define GET_HASH_TABLE(id) \ 72 #define GET_HASH_TABLE(id) \
73 (XHASH_TABLE (XCDR(XVECTOR(Vtranslation_hash_table_vector)->contents[(id)]))) 73 (XHASH_TABLE (XCDR(XVECTOR(Vtranslation_hash_table_vector)->contents[(id)])))
74 /* Copied from fns.c. */
75 #define HASH_VALUE(H, IDX) AREF ((H)->key_and_value, 2 * (IDX) + 1)
76 74
77 /* CCL (Code Conversion Language) is a simple language which has 75 /* CCL (Code Conversion Language) is a simple language which has
78 operations on one input buffer, one output buffer, and 7 registers. 76 operations on one input buffer, one output buffer, and 7 registers.
79 The syntax of CCL is described in `ccl.el'. Emacs Lisp function 77 The syntax of CCL is described in `ccl.el'. Emacs Lisp function
80 `ccl-compile' compiles a CCL program and produces a CCL code which 78 `ccl-compile' compiles a CCL program and produces a CCL code which