(sxhash): As far as possible, merge calculation of
hash code for symbols and strings.
This commit is contained in:
parent
4211ee7d6c
commit
32bfb2d565
1 changed files with 4 additions and 5 deletions
|
@ -5007,15 +5007,14 @@ sxhash (obj, depth)
|
|||
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;
|
||||
|
|
Loading…
Add table
Reference in a new issue