projects
/
chise
/
xemacs-chise.git.1
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
import xemacs-21.2.37
[chise/xemacs-chise.git.1]
/
lisp
/
cl-macs.el
diff --git
a/lisp/cl-macs.el
b/lisp/cl-macs.el
index
3299793
..
6eddb94
100644
(file)
--- a/
lisp/cl-macs.el
+++ b/
lisp/cl-macs.el
@@
-2434,10
+2434,10
@@
The type name can then be used in `typecase', `check-type', etc."
(t (error "Bad type spec: %s" type)))))
;;;###autoload
(t (error "Bad type spec: %s" type)))))
;;;###autoload
-(defun typep (val type) ; See compiler macro below.
+(defun typep (object type) ; See compiler macro below.
"Check that OBJECT is of type TYPE.
TYPE is a Common Lisp-style type specifier."
"Check that OBJECT is of type TYPE.
TYPE is a Common Lisp-style type specifier."
- (eval (cl-make-type-test 'val type)))
+ (eval (cl-make-type-test 'object type)))
;;;###autoload
(defmacro check-type (form type &optional string)
;;;###autoload
(defmacro check-type (form type &optional string)