(sxhash_list): Include last non-nil CDR in hash.

[gnu-emacs] / src / fns.c

diff --git a/src/fns.c b/src/fns.c
index bb78b9a407c912d289958e7779ed6a87d07148aa..404a587b1cf1389a27b5476cee4eb9b1079872ff 100644 (file)
--- 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;
 }