summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorAndrea Corallo <akrl@sdf.org>2021-01-17 22:00:42 +0100
committerAndrea Corallo <akrl@sdf.org>2021-01-17 22:42:19 +0100
commit39b3bcd324c4519ae3b204a31ab1a385b8ba9574 (patch)
tree2ec8fbaa1edd75de3563ebecc9ce6f6d1bb6ac9a /lisp/emacs-lisp
parent339b4a754b0abe8e376c96ff3ca9624d8942cab2 (diff)
downloademacs-39b3bcd324c4519ae3b204a31ab1a385b8ba9574.tar.gz
emacs-39b3bcd324c4519ae3b204a31ab1a385b8ba9574.tar.bz2
emacs-39b3bcd324c4519ae3b204a31ab1a385b8ba9574.zip
* Run dead code removal always before fwprop, optim bootstrap time (~20% less)
* lisp/emacs-lisp/comp.el (comp-passes): Remove `comp-dead-code'. (comp-fwprop): Call `comp-dead-code'. (comp-dead-code): Remove fake arg.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/comp.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/comp.el b/lisp/emacs-lisp/comp.el
index d4faa207b5d..d2e0d0fb79d 100644
--- a/lisp/emacs-lisp/comp.el
+++ b/lisp/emacs-lisp/comp.el
@@ -175,7 +175,6 @@ Can be one of: 'd-default', 'd-impure' or 'd-ephemeral'. See `comp-ctxt'.")
comp-ipa-pure
comp-add-cstrs
comp-fwprop
- comp-dead-code
comp-tco
comp-fwprop
comp-remove-type-hints
@@ -3130,6 +3129,7 @@ Return t if something was changed."
(defun comp-fwprop (_)
"Forward propagate types and consts within the lattice."
(comp-ssa)
+ (comp-dead-code)
(maphash (lambda (_ f)
(when (and (>= (comp-func-speed f) 2)
;; FIXME remove the following condition when tested.
@@ -3302,7 +3302,7 @@ Return the list of m-var ids nuked."
insn))))))))
nuke-list)))
-(defun comp-dead-code (_)
+(defun comp-dead-code ()
"Dead code elimination."
(maphash (lambda (_ f)
(when (and (>= (comp-func-speed f) 2)