* lisp/emacs-lisp/cl-macs.el (character): Can't be negative

Fixes (bug#21701)
This commit is contained in:
Stefan Monnier 2015-12-04 08:28:39 -05:00
parent 9bfcd87c04
commit 3a9df7589a

View file

@ -2885,7 +2885,7 @@ Of course, we really can't know that for sure, so it's just a heuristic."
(put 'real 'cl-deftype-satisfies #'numberp)
(put 'fixnum 'cl-deftype-satisfies #'integerp)
(put 'base-char 'cl-deftype-satisfies #'characterp)
(put 'character 'cl-deftype-satisfies #'integerp)
(put 'character 'cl-deftype-satisfies #'natnump)
;;;###autoload