Mercurial > emacs

diff src/fns.c @ 57988:75429b9aa2f2

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(sxhash): As far as possible, merge calculation of hash code for symbols and strings.
author Eli Zaretskii <eliz@gnu.org>
date Sat, 06 Nov 2004 17:01:27 +0000
parents 66e97a54985f
children 6c9552cf734a cb7f41387eb3
line wrap: on
line diff
--- a/src/fns.c	Sat Nov 06 17:00:37 2004 +0000
+++ b/src/fns.c	Sat Nov 06 17:01:27 2004 +0000
@@ -5007,15 +5007,14 @@
       hash = XUINT (obj);
       break;
 
-    case Lisp_Symbol:
-      hash = sxhash_string (SDATA (SYMBOL_NAME (obj)),
-			    SCHARS (SYMBOL_NAME (obj)));
-      break;
-
     case Lisp_Misc:
       hash = XUINT (obj);
       break;
 
+    case Lisp_Symbol:
+      obj = SYMBOL_NAME (obj);
+      /* Fall through.  */
+
     case Lisp_String:
       hash = sxhash_string (SDATA (obj), SCHARS (obj));
       break;