diff src/elhash.c @ 434:9d177e8d4150 r21-2-25

Import from CVS: tag r21-2-25
author cvs
date Mon, 13 Aug 2007 11:30:53 +0200
parents 3a7e78e1142d
children 84b14dcb0985
line wrap: on
line diff
--- a/src/elhash.c	Mon Aug 13 11:30:00 2007 +0200
+++ b/src/elhash.c	Mon Aug 13 11:30:53 2007 +0200
@@ -70,13 +70,13 @@
 #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 (;							\