diff src/elhash.c @ 444:576fb035e263 r21-2-37

Import from CVS: tag r21-2-37
author cvs
date Mon, 13 Aug 2007 11:36:19 +0200
parents abe6d1db359e
children 98528da0b7fc
line wrap: on
line diff
--- a/src/elhash.c	Mon Aug 13 11:35:05 2007 +0200
+++ b/src/elhash.c	Mon Aug 13 11:36:19 2007 +0200
@@ -71,9 +71,9 @@
 #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)
+  ((((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)))
@@ -1432,7 +1432,7 @@
 
 DEFUN ("sxhash", Fsxhash, 1, 1, 0, /*
 Return a hash value for OBJECT.
-(equal obj1 obj2) implies (= (sxhash obj1) (sxhash obj2)).
+\(equal obj1 obj2) implies (= (sxhash obj1) (sxhash obj2)).
 */
        (object))
 {