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

diff --git a/src/elhash.c b/src/elhash.c
index e44ca97..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 (;							\
@@ -931,7 +931,7 @@ reorganize_hash_table (Lisp_Hash_Table *ht)
 static void
 enlarge_hash_table (Lisp_Hash_Table *ht)
 {
-  size_t new_size = 
+  size_t new_size =
     hash_table_size ((size_t) ((double) ht->size * ht->rehash_size));
   resize_hash_table (ht, new_size);
 }