From 35c58b13409cb56d8362a9884063cd88683d3381 Mon Sep 17 00:00:00 2001 From: tomo Date: Wed, 14 Nov 2001 02:52:42 +0000 Subject: [PATCH] (uint8_byte_table_description): New constant. (uint8-byte-table): Use `uint8_byte_table_description'. (uint16_byte_table_description): New constant. (uint16-byte-table): Use `uint16_byte_table_description'. --- src/chartab.c | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/src/chartab.c b/src/chartab.c index e941464..84878f4 100644 --- a/src/chartab.c +++ b/src/chartab.c @@ -190,12 +190,16 @@ uint8_byte_table_hash (Lisp_Object obj, int depth) return hash; } +static const struct lrecord_description uint8_byte_table_description[] = { + { XD_END } +}; + DEFINE_LRECORD_IMPLEMENTATION ("uint8-byte-table", uint8_byte_table, mark_uint8_byte_table, print_uint8_byte_table, 0, uint8_byte_table_equal, uint8_byte_table_hash, - 0 /* uint8_byte_table_description */, + uint8_byte_table_description, Lisp_Uint8_Byte_Table); static Lisp_Object @@ -415,12 +419,16 @@ uint16_byte_table_hash (Lisp_Object obj, int depth) return hash; } +static const struct lrecord_description uint16_byte_table_description[] = { + { XD_END } +}; + DEFINE_LRECORD_IMPLEMENTATION ("uint16-byte-table", uint16_byte_table, mark_uint16_byte_table, print_uint16_byte_table, 0, uint16_byte_table_equal, uint16_byte_table_hash, - 0 /* uint16_byte_table_description */, + uint16_byte_table_description, Lisp_Uint16_Byte_Table); static Lisp_Object -- 1.7.10.4