* Fix two comp-cstr tests

* test/lisp/emacs-lisp/comp-cstr-tests.el
	(comp-cstr-typespec-tests-alist): Fix test 53 70.
This commit is contained in:
Andrea Corallo 2021-04-13 10:38:14 +02:00
parent 70adc28e97
commit 2d23f19e7d

View file

@ -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