mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-30 09:00:31 -08:00
Code Issues Projects Releases Wiki Activity

(byte-compile-current-file): Don't bind

Browse source 
it, so that a boundp test can be used to determine if we're
currently byte-compiling.
This commit is contained in:
Gerd Moellmann 2000-11-09 16:07:56 +00:00
parent cb1544262a
commit 6a619620de
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/emacs-lisp/bytecomp.el
View file

@ -10,7 +10,7 @@
;;; This version incorporates changes up to version 2.10 of the
;;; Zawinski-Furuseth compiler.
(defconst byte-compile-version "$Revision: 2.78 $")
(defconst byte-compile-version "$Revision: 2.79.1.1 $")
;; This file is part of GNU Emacs.
@ -792,9 +792,11 @@ Each function's symbol gets marked with the `byte-compile-noruntime' property."
;;; byte compiler messages
(defvar byte-compile-current-form nil)
(defvar byte-compile-current-file nil)
(defvar byte-compile-dest-file nil)
;; Don't actually bind this.
(defvar byte-compile-current-file)
(defmacro byte-compile-log (format-string &rest args)
(list 'and
'byte-optimize