From 2d23f19e7d5ff8a1ec1a188dcd530c185029d1f8 Mon Sep 17 00:00:00 2001 From: Andrea Corallo Date: Tue, 13 Apr 2021 10:38:14 +0200 Subject: [PATCH] * Fix two comp-cstr tests * test/lisp/emacs-lisp/comp-cstr-tests.el (comp-cstr-typespec-tests-alist): Fix test 53 70. --- test/lisp/emacs-lisp/comp-cstr-tests.el | 4 ++-- 1 file 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 -- 2.39.2