diff options
| author | Stefan Monnier | 2015-12-04 08:28:39 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2015-12-04 08:28:39 -0500 |
| commit | 3a9df7589ae189fc34a5fab98e82d85d2d40433f (patch) | |
| tree | d9d28bbc0d9ee62e26c7bc07f5a5308395d0ec8e | |
| parent | 9bfcd87c04c25f9c76c8617853d3d03531259232 (diff) | |
| download | emacs-3a9df7589ae189fc34a5fab98e82d85d2d40433f.tar.gz emacs-3a9df7589ae189fc34a5fab98e82d85d2d40433f.zip | |
* lisp/emacs-lisp/cl-macs.el (character): Can't be negative
Fixes (bug#21701)
| -rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index 09d2d3f9a5e..c8aad3aafc8 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el | |||
| @@ -2885,7 +2885,7 @@ Of course, we really can't know that for sure, so it's just a heuristic." | |||
| 2885 | (put 'real 'cl-deftype-satisfies #'numberp) | 2885 | (put 'real 'cl-deftype-satisfies #'numberp) |
| 2886 | (put 'fixnum 'cl-deftype-satisfies #'integerp) | 2886 | (put 'fixnum 'cl-deftype-satisfies #'integerp) |
| 2887 | (put 'base-char 'cl-deftype-satisfies #'characterp) | 2887 | (put 'base-char 'cl-deftype-satisfies #'characterp) |
| 2888 | (put 'character 'cl-deftype-satisfies #'integerp) | 2888 | (put 'character 'cl-deftype-satisfies #'natnump) |
| 2889 | 2889 | ||
| 2890 | 2890 | ||
| 2891 | ;;;###autoload | 2891 | ;;;###autoload |