summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2021-04-13 10:38:14 +0200
committerAndrea Corallo <akrl@sdf.org>2021-04-13 12:05:33 +0200
commit2d23f19e7d5ff8a1ec1a188dcd530c185029d1f8 (patch)
treeee3726938811549af8a192f9788e52b6726c15b0 /test/lisp/emacs-lisp
parent70adc28e9798abede5dd8c137c1543b46af6eacc (diff)
downloademacs-2d23f19e7d5ff8a1ec1a188dcd530c185029d1f8.tar.gz
emacs-2d23f19e7d5ff8a1ec1a188dcd530c185029d1f8.tar.bz2
emacs-2d23f19e7d5ff8a1ec1a188dcd530c185029d1f8.zip
* Fix two comp-cstr tests
* test/lisp/emacs-lisp/comp-cstr-tests.el (comp-cstr-typespec-tests-alist): Fix test 53 70.
Diffstat (limited to 'test/lisp/emacs-lisp')
-rw-r--r--test/lisp/emacs-lisp/comp-cstr-tests.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/test/lisp/emacs-lisp/comp-cstr-tests.el b/test/lisp/emacs-lisp/comp-cstr-tests.el
index f2d9bf583e5..c2492b93f6f 100644
--- a/test/lisp/emacs-lisp/comp-cstr-tests.el
+++ b/test/lisp/emacs-lisp/comp-cstr-tests.el
@@ -147,7 +147,7 @@
;; 52 Conservative.
((or (member foo) (not string)) . (not string))
;; 53
- ((or (not (integer 1 2)) integer) . integer)
+ ((or (not (integer 1 2)) integer) . t)
;; 54
((or (not (integer 1 2)) (not integer)) . (not integer))
;; 55
@@ -181,7 +181,7 @@
;; 69
((and (integer 0 20) (not (integer 5 10))) . (or (integer 0 4) (integer 11 20)))
;; 70
- ((and (not (member a)) (not (member b))) . (not (member b a)))
+ ((and (not (member a)) (not (member b))) . (not (member a b)))
;; 71
((and (not boolean) (not (member b))) . (not (or (member b) boolean)))
;; 72