changeset 5125:127a513c13b2

(edebug-functionp): Recognize compiled functions.
author Richard M. Stallman <rms@gnu.org>
date Tue, 23 Nov 1993 08:41:03 +0000
parents 1aba6a79cb3d
children 30682388c4cf
files lisp/emacs-lisp/edebug.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/edebug.el	Tue Nov 23 08:35:46 1993 +0000
+++ b/lisp/emacs-lisp/edebug.el	Tue Nov 23 08:41:03 1993 +0000
@@ -327,6 +327,7 @@
   (while (and (symbolp object) (fboundp object))
     (setq object (symbol-function object)))
   (if (or (subrp object)
+	  (byte-code-function-p object)
 	  (and (listp object)
 	       (eq (car object) 'lambda)
 	       (listp (car (cdr object)))))