mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-25 19:11:56 +00:00
Code Issues Releases Activity

(functionp): Doc fix.

Browse Source
This commit is contained in:
Luc Teirlinck 2004-01-03 17:17:21 +00:00
parent dbcd463f79
commit 756bb7366f
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/subr.el
View File

@ -2205,7 +2205,10 @@ configuration."
(eq (car object) 'frame-configuration)))
(defun functionp (object)
"Non-nil iff OBJECT is a type of object that can be called as a function."
"Non-nil if OBJECT is any kind of function or a special form.
Also non-nil if OBJECT is a symbol and its function definition is
\(recursively) a function or special form. This does not include
macros."
(or (and (symbolp object) (fboundp object)
(condition-case nil
(setq object (indirect-function object))