From: Paul Eggert <eggert@cs.ucla.edu>
Date: Mon, 13 Jun 2011 05:24:58 +0000 (-0700)
Subject: * lisp.h (CHAR_TABLE_SET): Omit now-redundant test.
X-Git-Tag: emacs-pretest-24.0.90~104^2~548^2~29
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=193e32d9a86691236b65238556b2d7a11bfc66d8;p=emacs.git

* lisp.h (CHAR_TABLE_SET): Omit now-redundant test.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index a9d47ebca16..ab821226fa4 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2011-06-13  Paul Eggert  <eggert@cs.ucla.edu>
 
+	* lisp.h (CHAR_TABLE_SET): Omit now-redundant test.
+
 	* lread.c (Fload): Don't compare a possibly-garbage time_t value.
 
 	GLYPH_CODE_FACE returns EMACS_INT, not int.
diff --git a/src/lisp.h b/src/lisp.h
index 1324440c700..389762a07e5 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -941,8 +941,7 @@ struct Lisp_Vector
 /* Equivalent to Faset (CT, IDX, VAL) with optimization for ASCII and
    8-bit European characters.  Do not check validity of CT.  */
 #define CHAR_TABLE_SET(CT, IDX, VAL)					\
-  (((IDX) >= 0 && ASCII_CHAR_P (IDX)					\
-    && SUB_CHAR_TABLE_P (XCHAR_TABLE (CT)->ascii))			\
+  (ASCII_CHAR_P (IDX) && SUB_CHAR_TABLE_P (XCHAR_TABLE (CT)->ascii)	\
    ? XSUB_CHAR_TABLE (XCHAR_TABLE (CT)->ascii)->contents[IDX] = VAL	\
    : char_table_set (CT, IDX, VAL))