Mercurial > emacs

diff lisp/subr.el @ 19176:d8eb24685152

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(functionp): Use byte-code-function-p, not compiled-function-p.
author Richard M. Stallman <rms@gnu.org>
date Tue, 05 Aug 1997 20:52:56 +0000
parents 3d80c899a15d
children f5fd22f3462c
line wrap: on
line diff
--- a/lisp/subr.el	Tue Aug 05 20:51:55 1997 +0000
+++ b/lisp/subr.el	Tue Aug 05 20:52:56 1997 +0000
@@ -1065,7 +1065,7 @@
 
 (defun functionp (object)
   "Non-nil if OBJECT is a type of object that can be called as a function."
-  (or (subrp object) (compiled-function-p object)
+  (or (subrp object) (byte-code-function-p object)
       (eq (car-safe object) 'lambda)
       (and (symbolp object) (fboundp object))))