* src/fns.c (sxhash_bignum): Include sign bit in hash.
This commit is contained in:
parent
53e60fb004
commit
6a53836a24
1 changed files with 1 additions and 1 deletions
|
@ -5193,7 +5193,7 @@ sxhash_bignum (Lisp_Object bignum)
|
|||
{
|
||||
mpz_t const *n = xbignum_val (bignum);
|
||||
size_t i, nlimbs = mpz_size (*n);
|
||||
EMACS_UINT hash = 0;
|
||||
EMACS_UINT hash = mpz_sgn(*n) < 0;
|
||||
|
||||
for (i = 0; i < nlimbs; ++i)
|
||||
hash = sxhash_combine (hash, mpz_getlimbn (*n, i));
|
||||
|
|
Loading…
Add table
Reference in a new issue