procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

some order into special vars

Browse source
This commit is contained in:
Andrea Corallo 2019-09-05 21:16:42 +02:00 • committed by Andrea Corallo
parent c05d414844
commit ff7093d74b
2 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -560,10 +560,13 @@ outputting warnings about functions not being defined at runtime.")
(defvar byte-compile-output nil (defvar byte-compile-output nil
"Alist describing contents to put in byte code string. "Alist describing contents to put in byte code string.
Each element is (INDEX . VALUE)") Each element is (INDEX . VALUE)")
(defvar byte-compile-lap-output nil)
(defvar byte-compile-depth 0 "Current depth of execution stack.") (defvar byte-compile-depth 0 "Current depth of execution stack.")
(defvar byte-compile-maxdepth 0 "Maximum depth of execution stack.") (defvar byte-compile-maxdepth 0 "Maximum depth of execution stack.")
;; These are use by comp.el to spill lap
(defvar byte-compile-spilling-lap nil)
(defvar byte-compile-lap-output nil)
;;; The byte codes; this information is duplicated in bytecomp.c ;;; The byte codes; this information is duplicated in bytecomp.c

1
lisp/emacs-lisp/comp.el
View file

@ -47,7 +47,6 @@
;; FIXME these has to be removed ;; FIXME these has to be removed
(defvar comp-speed 2) (defvar comp-speed 2)
(defvar byte-compile-lap-output)
(defvar comp-pass nil (defvar comp-pass nil
"Every pass has the right to bind what it likes here.") "Every pass has the right to bind what it likes here.")