1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 10:31:37 -08:00

limplify top level at last

This commit is contained in:
Andrea Corallo 2019-11-02 17:32:20 +01:00
parent 5eb8d3dba1
commit fb309c14f0

View file

@ -1123,9 +1123,8 @@ This will be called at load-time."
(defun comp-limplify (lap-funcs)
"Compute the LIMPLE ir for LAP-FUNCS.
Top level forms for the current context are rendered too."
(mapc #'comp-add-func-to-ctxt
(cons (comp-limplify-top-level)
(mapcar #'comp-limplify-function lap-funcs))))
(mapc #'comp-add-func-to-ctxt (mapcar #'comp-limplify-function lap-funcs))
(comp-add-func-to-ctxt (comp-limplify-top-level)))
;;; SSA pass specific code.