summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp/comp-cstr-tests.el
diff options
context:
space:
mode:
Diffstat (limited to 'test/lisp/emacs-lisp/comp-cstr-tests.el')
-rw-r--r--test/lisp/emacs-lisp/comp-cstr-tests.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/test/lisp/emacs-lisp/comp-cstr-tests.el b/test/lisp/emacs-lisp/comp-cstr-tests.el
index 5c119c6ba3e..0b10b7f80a1 100644
--- a/test/lisp/emacs-lisp/comp-cstr-tests.el
+++ b/test/lisp/emacs-lisp/comp-cstr-tests.el
@@ -85,7 +85,9 @@
((or symbol (not sequence)) . t)
((or vector (not sequence)) . (not sequence))
((or (integer 1 10) (not (integer * 5))) . (integer 1 *))
- ((or symbol (integer 1 10) (not (integer * 5))) . (integer 1 *)))
+ ((or symbol (integer 1 10) (not (integer * 5))) . (integer 1 *))
+ ((or symbol (not (member foo))) . (not (member foo)))
+ ((or (not symbol) (not (member foo))) . (not symbol)))
"Alist type specifier -> expected type specifier.")
(defmacro comp-cstr-synthesize-tests ()