X-Git-Url: http://git.chise.org/gitweb/?p=chise%2Fxemacs-chise.git.1;a=blobdiff_plain;f=src%2Felhash.c;h=29fe77969792f7d12fbe840beac6cf0c71a142a9;hp=384b1e55eaf9e6545e326dfa6b91cd559606afef;hb=46f51e794ddb493a8a76ec2f3be00b41e3b0be22;hpb=ea21eb75bbf90355514d65686bd53bea579f8e23

diff --git a/src/elhash.c b/src/elhash.c
index 384b1e5..29fe779 100644
--- a/src/elhash.c
+++ b/src/elhash.c
@@ -70,13 +70,13 @@ typedef struct Lisp_Hash_Table Lisp_Hash_Table;
 #define HASH_TABLE_DEFAULT_REHASH_SIZE 1.3
 #define HASH_TABLE_MIN_SIZE 10
 
-#define HASH_CODE(key, ht)							\
-  (((((ht)->hash_function ? (ht)->hash_function (key) : LISP_HASH (key))	\
-     * (ht)->golden_ratio)								\
-    % (ht)->size))
+#define HASH_CODE(key, ht)						\
+((((ht)->hash_function ? (ht)->hash_function (key) : LISP_HASH (key))	\
+  * (ht)->golden_ratio)							\
+ % (ht)->size)
 
 #define KEYS_EQUAL_P(key1, key2, testfun) \
-  (EQ ((key1), (key2)) || ((testfun) && (testfun) ((key1), (key2))))
+  (EQ (key1, key2) || ((testfun) && (testfun) (key1, key2)))
 
 #define LINEAR_PROBING_LOOP(probe, entries, size)		\
   for (;							\