diff options
author | Po Lu <luangruo@yahoo.com> | 2024-04-10 22:34:02 +0800 |
---|---|---|
committer | Po Lu <luangruo@yahoo.com> | 2024-04-10 22:34:02 +0800 |
commit | 0bfc1d4e7eedb8496a293cf51c2b731a43c2010e (patch) | |
tree | 254717a53d5010fef592329628a737428d758847 /lisp/emacs-lisp/cl-macs.el | |
parent | 049bdfdaec4ee0c791fbf034b683e06ee84ce1db (diff) | |
parent | 33516970808a6c50709325edfc1af125c2b2c401 (diff) | |
download | emacs-0bfc1d4e7eedb8496a293cf51c2b731a43c2010e.tar.gz emacs-0bfc1d4e7eedb8496a293cf51c2b731a43c2010e.tar.bz2 emacs-0bfc1d4e7eedb8496a293cf51c2b731a43c2010e.zip |
Merge remote-tracking branch 'savannah/master' into master-android-1
Diffstat (limited to 'lisp/emacs-lisp/cl-macs.el')
-rw-r--r-- | lisp/emacs-lisp/cl-macs.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el index a84ef4a34b2..1350e474d6a 100644 --- a/lisp/emacs-lisp/cl-macs.el +++ b/lisp/emacs-lisp/cl-macs.el @@ -3479,6 +3479,7 @@ Of course, we really can't know that for sure, so it's just a heuristic." ;;;###autoload (define-inline cl-typep (val type) + "Return t if VAL is of type TYPE, nil otherwise." (inline-letevals (val) (pcase (inline-const-val type) ((and `(,name . ,args) (guard (get name 'cl-deftype-handler))) |