From: Paul Eggert Date: Tue, 8 Mar 2011 08:13:36 +0000 (-0800) Subject: * chartab.c (ASET_RANGE, GET_SUB_CHAR_TABLE): Remove unused macros. X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~605^2^2~48 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bbcd0949d9cd085b6838c03f3d89171f967372fa;p=emacs.git * chartab.c (ASET_RANGE, GET_SUB_CHAR_TABLE): Remove unused macros. --- 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) {