changeset 19176:d8eb24685152

(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 31175a4bf0a6
files lisp/subr.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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))))