[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 3a9df75: * lisp/emacs-lisp/cl-macs.el (character)
From: |
Stefan Monnier |
Subject: |
[Emacs-diffs] emacs-25 3a9df75: * lisp/emacs-lisp/cl-macs.el (character): Can't be negative |
Date: |
Fri, 04 Dec 2015 13:28:43 +0000 |
branch: emacs-25
commit 3a9df7589ae189fc34a5fab98e82d85d2d40433f
Author: Stefan Monnier <address@hidden>
Commit: Stefan Monnier <address@hidden>
* lisp/emacs-lisp/cl-macs.el (character): Can't be negative
Fixes (bug#21701)
---
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 09d2d3f..c8aad3a 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."
(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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-25 3a9df75: * lisp/emacs-lisp/cl-macs.el (character): Can't be negative,
Stefan Monnier <=