Function: comp--type-check-optim
comp--type-check-optim is a byte-compiled function defined in
comp.el.gz.
Signature
(comp--type-check-optim _)
Documentation
Optimize conditional branches when possible.
Source Code
;; Defined in /usr/src/emacs/lisp/emacs-lisp/comp.el.gz
(defun comp--type-check-optim (_)
"Optimize conditional branches when possible."
(cl-loop
for f being each hash-value of (comp-ctxt-funcs-h comp-ctxt)
for comp-func = f
when (>= (comp-func-speed f) 2)
do (cl-loop
for b being each hash-value of (comp-func-blocks f)
do (comp--type-check-optim-block b)
finally
(progn
(when (eq (comp-func-ssa-status f) 'dirty)
(comp--ssa-function f))
(comp--log-func comp-func 3)))))