* lisp/emacs-lisp/comp.el (comp-passes): Remove `comp-dead-code'.
(comp-fwprop): Call `comp-dead-code'.
(comp-dead-code): Remove fake arg.
comp-ipa-pure
comp-add-cstrs
comp-fwprop
- comp-dead-code
comp-tco
comp-fwprop
comp-remove-type-hints
(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.
insn))))))))
nuke-list)))
-(defun comp-dead-code (_)
+(defun comp-dead-code ()
"Dead code elimination."
(maphash (lambda (_ f)
(when (and (>= (comp-func-speed f) 2)