From: Andrea Corallo <acorallo@gnu.org>
Date: Sun, 11 Feb 2024 09:43:57 +0000 (+0100)
Subject: * Improve reproducibility of inferred values by native comp
X-Git-Tag: archive/raspbian/1%29.4+1-4+rpi1~1^2~2^2~18^2~59^2
X-Git-Url: https://dgit.raspbian.org/?a=commitdiff_plain;h=614b244a7fa03fcb27d76757e14ef0fa895d6f23;p=emacs.git

* Improve reproducibility of inferred values by native comp

* lisp/emacs-lisp/comp-cstr.el (comp-normalize-valset): Do not try to
reorder conses using 'sxhash-equal' as its behavior is not reproducible
over different sessions.
---

diff --git a/lisp/emacs-lisp/comp-cstr.el b/lisp/emacs-lisp/comp-cstr.el
index 812a79f070d..ecbe6e38a1d 100644
--- a/lisp/emacs-lisp/comp-cstr.el
+++ b/lisp/emacs-lisp/comp-cstr.el
@@ -203,6 +203,8 @@ Return them as multiple value."
                t)
               ((and (not (symbolp x)) (symbolp y))
                nil)
+              ((or (consp x) (consp y)
+                   nil))
               (t
                (< (sxhash-equal x)
                   (sxhash-equal y)))))))