summaryrefslogtreecommitdiff
path: root/test/lisp/emacs-lisp
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2021-02-22 13:58:30 +0100
committerAndrea Corallo <akrl@sdf.org>2021-02-22 13:59:56 +0100
commitd6227f6edcff7be05469e99da4ce541bfc474c3d (patch)
treefded45fd969f963c21295860dda09c81d09be87c /test/lisp/emacs-lisp
parentda4da88c76465e30ce974383b182f191553b470a (diff)
downloademacs-d6227f6edcff7be05469e99da4ce541bfc474c3d.tar.gz
emacs-d6227f6edcff7be05469e99da4ce541bfc474c3d.tar.bz2
emacs-d6227f6edcff7be05469e99da4ce541bfc474c3d.zip
* Fix union constraint for mixed pos/neg constraints
* lisp/emacs-lisp/comp-cstr.el (comp-cstr-union-1-no-mem): Fix neg type shadowing pos values. * test/lisp/emacs-lisp/comp-cstr-tests.el (comp-cstr-typespec-tests-alist): Add testcase. * test/src/comp-tests.el (comp-tests-type-spec-tests): Fix testcase.
Diffstat (limited to 'test/lisp/emacs-lisp')
-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 b4db54666c7..f2d9bf583e5 100644
--- a/test/lisp/emacs-lisp/comp-cstr-tests.el
+++ b/test/lisp/emacs-lisp/comp-cstr-tests.el
@@ -211,7 +211,9 @@
;; 85
((or (not string) t) . t)
;; 86
- ((or (not vector) sequence) . sequence))
+ ((or (not vector) sequence) . sequence)
+ ;; 87
+ ((or (not symbol) null) . t))
"Alist type specifier -> expected type specifier."))
(defmacro comp-cstr-synthesize-tests ()