summaryrefslogtreecommitdiff
path: root/src/ccl.c
diff options
context:
space:
mode:
authorDmitry Antipov <dmantipov@yandex.ru>2012-06-19 20:56:28 +0400
committerDmitry Antipov <dmantipov@yandex.ru>2012-06-19 20:56:28 +0400
commit28be1ada0fb9a4b51cf361dc45208e764bd34143 (patch)
tree30a21470e485d1d9f397d97dcb9a386c578ab746 /src/ccl.c
parent68f12411893785de1cfc2c24ec36059e49af5d55 (diff)
downloademacs-28be1ada0fb9a4b51cf361dc45208e764bd34143.tar.gz
* alloc.c, bytecode.c, ccl.c, coding.c, composite.c, data.c, dosfns.c:
* font.c, image.c, keyboard.c, lread.c, menu.c, minibuf.c, msdos.c: * print.c, syntax.c, window.c, xmenu.c, xselect.c: Replace direct access to `contents' member of Lisp_Vector objects with AREF and ASET where appropriate.
Diffstat (limited to 'src/ccl.c')
-rw-r--r--src/ccl.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/ccl.c b/src/ccl.c
index 5da90ad4f04..163d01fe283 100644
--- a/src/ccl.c
+++ b/src/ccl.c
@@ -61,7 +61,7 @@ static Lisp_Object Vccl_program_table;
/* Return a hash table of id number ID. */
#define GET_HASH_TABLE(id) \
- (XHASH_TABLE (XCDR (XVECTOR (Vtranslation_hash_table_vector)->contents[(id)])))
+ (XHASH_TABLE (XCDR (AREF (Vtranslation_hash_table_vector, (id)))))
/* CCL (Code Conversion Language) is a simple language which has
operations on one input buffer, one output buffer, and 7 registers.