Function: comp--ssa

comp--ssa is a byte-compiled function defined in comp.el.gz.

Signature

(comp--ssa)

Documentation

Port all functions into minimal SSA form.

Source Code

;; Defined in /usr/src/emacs/lisp/emacs-lisp/comp.el.gz
(defun comp--ssa ()
  "Port all functions into minimal SSA form."
  (maphash (lambda (_ f)
             (let* ((comp-func f)
                    (ssa-status (comp-func-ssa-status f)))
               (unless (eq ssa-status t)
                 (cl-loop
                  when (eq ssa-status 'dirty)
                    do (comp--clean-ssa f)
                  do (comp--compute-edges)
                     (comp--compute-dominator-tree)
                 until (null (comp--remove-unreachable-blocks)))
                 (comp--compute-dominator-frontiers)
                 (comp--log-block-info)
                 (comp--place-phis)
                 (comp--ssa-rename)
                 (comp--finalize-phis)
                 (comp--log-func comp-func 3)
                 (setf (comp-func-ssa-status f) t))))
           (comp-ctxt-funcs-h comp-ctxt)))