From bbcd0949d9cd085b6838c03f3d89171f967372fa Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Tue, 8 Mar 2011 00:13:36 -0800 Subject: [PATCH] * chartab.c (ASET_RANGE, GET_SUB_CHAR_TABLE): Remove unused macros. --- src/ChangeLog | 1 + src/chartab.c | 14 -------------- 2 files changed, 1 insertion(+), 14 deletions(-) diff --git a/src/ChangeLog b/src/ChangeLog index ccd0578cf38..7f179c13420 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -76,6 +76,7 @@ elsewhere. (sub_char_table_ref_and_range, char_table_ref_and_range): Rename locals to avoid shadowing. + (ASET_RANGE, GET_SUB_CHAR_TABLE): Remove unused macros. 2011-03-06 Chong Yidong diff --git a/src/chartab.c b/src/chartab.c index ec5b2ffab76..85aa5932ac3 100644 --- a/src/chartab.c +++ b/src/chartab.c @@ -331,20 +331,6 @@ char_table_ref_and_range (Lisp_Object table, int c, int *from, int *to) } -#define ASET_RANGE(ARRAY, FROM, TO, LIMIT, VAL) \ - do { \ - int limit = (TO) < (LIMIT) ? (TO) : (LIMIT); \ - for (; (FROM) < limit; (FROM)++) (ARRAY)->contents[(FROM)] = (VAL); \ - } while (0) - -#define GET_SUB_CHAR_TABLE(TABLE, SUBTABLE, IDX, DEPTH, MIN_CHAR) \ - do { \ - (SUBTABLE) = (TABLE)->contents[(IDX)]; \ - if (!SUB_CHAR_TABLE_P (SUBTABLE)) \ - (SUBTABLE) = make_sub_char_table ((DEPTH), (MIN_CHAR), (SUBTABLE)); \ - } while (0) - - static void sub_char_table_set (Lisp_Object table, int c, Lisp_Object val) { -- 2.39.5