summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/cl-lib-tests.el
diff options
context:
space:
mode:
authorStefan Kangas <stefankangas@gmail.com>2022-12-19 04:42:18 +0100
committerStefan Kangas <stefankangas@gmail.com>2022-12-19 04:42:18 +0100
commitd468cf91b9fbcd915644246f27dbaa87e23c7e7b (patch)
treec88c14f5372b67e3f02bcb16359b99256d9f2800 /test/lisp/emacs-lisp/cl-lib-tests.el
parent9a633dce63904b54738a63eb5007869fd851419a (diff)
parentde2239a584ab9b3bcdea2379f2c54ea3d20d596f (diff)
downloademacs-d468cf91b9fbcd915644246f27dbaa87e23c7e7b.tar.gz
Merge from origin/emacs-29
de2239a584a Revert "alist-get testfn argument evaluation correction" 856d889f3a8 Revert "Elide broken but unnecessary `if` optimisations" 8e42e20ed7f Revert "Use equal and member instead of eq and memq"
Diffstat (limited to 'test/lisp/emacs-lisp/cl-lib-tests.el')
-rw-r--r--test/lisp/emacs-lisp/cl-lib-tests.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/cl-lib-tests.el b/test/lisp/emacs-lisp/cl-lib-tests.el
index 759138569e4..4ec24e51e06 100644
--- a/test/lisp/emacs-lisp/cl-lib-tests.el
+++ b/test/lisp/emacs-lisp/cl-lib-tests.el
@@ -404,7 +404,7 @@
(ert-deftest cl-lib-nth-value-test-multiple-values ()
"While CL multiple values are an alias to list, these won't work."
:expected-result :failed
- (should (equal (cl-nth-value 0 '(2 3)) '(2 3)))
+ (should (eq (cl-nth-value 0 '(2 3)) '(2 3)))
(should (= (cl-nth-value 0 1) 1))
(should (null (cl-nth-value 1 1)))
(should-error (cl-nth-value -1 (cl-values 2 3)) :type 'args-out-of-range)