* chartab.c (ASET_RANGE, GET_SUB_CHAR_TABLE): Remove unused macros.

diff --git a/src/ChangeLog b/src/ChangeLog
index ccd0578cf38dd40984a1f022b6dbcc9e1635c916..7f179c134203cad4b8cde24bffa4d393535504e9 100644 (file)
--- 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  <cyd@stupidchicken.com>
 

diff --git a/src/chartab.c b/src/chartab.c
index ec5b2ffab76165b52b1bf7ac78ea9a633980acd4..85aa5932ac3e1a622cb8935898c4cbf51e74fea1 100644 (file)
--- 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)
 {