diff options
| author | Kim F. Storm <storm@cua.dk> | 2006-03-24 13:26:36 +0000 |
|---|---|---|
| committer | Kim F. Storm <storm@cua.dk> | 2006-03-24 13:26:36 +0000 |
| commit | ea284f335c8d62274cee742b53a62c120ce50a6a (patch) | |
| tree | b18f78dd4b694c59d1ffc670d71bb865bb9990ca /src | |
| parent | 8928c512e43afb739263d26730169c4de3809c06 (diff) | |
| download | emacs-ea284f335c8d62274cee742b53a62c120ce50a6a.tar.gz | |
(sxhash_list): Include last non-nil CDR in hash.
Diffstat (limited to 'src')
| -rw-r--r-- | src/fns.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/fns.c b/src/fns.c index bb78b9a407c..404a587b1cf 100644 --- a/src/fns.c +++ b/src/fns.c @@ -5114,6 +5114,12 @@ sxhash_list (list, depth) hash = SXHASH_COMBINE (hash, hash2); } + if (!NILP (list)) + { + unsigned hash2 = sxhash (list, depth + 1); + hash = SXHASH_COMBINE (hash, hash2); + } + return hash; } |