# HG changeset patch
# User Dave Love <fx@gnu.org>
# Date 959279084 0
# Node ID 88e33ac31c147275014ac2b0bca25bd67f83697d
# Parent  6fa5b7f5de9c970f4884a8f8e33e9d30cb0392ff
(elp-restore-function): Don't use obsolete byte-code-function-p.

diff -r 6fa5b7f5de9c -r 88e33ac31c14 lisp/emacs-lisp/elp.el
--- a/lisp/emacs-lisp/elp.el	Thu May 25 18:20:20 2000 +0000
+++ b/lisp/emacs-lisp/elp.el	Thu May 25 18:24:44 2000 +0000
@@ -313,7 +313,7 @@
     ;; the case that a lisp function can be compiled instrumented?
     (and info
 	 (functionp funsym)
-	 (not (compiled-function-p (symbol-function funsym)))
+	 (not (byte-code-function-p (symbol-function funsym)))
 	 (assq 'elp-wrapper (symbol-function funsym))
 	 (fset funsym (aref info 2)))))