Function: comp--log-func
comp--log-func is a byte-compiled function defined in comp.el.gz.
Signature
(comp--log-func FUNC VERBOSITY)
Documentation
Log function FUNC at VERBOSITY.
VERBOSITY is a number between 0 and 3.
Source Code
;; Defined in /usr/src/emacs/lisp/emacs-lisp/comp.el.gz
(defun comp--log-func (func verbosity)
"Log function FUNC at VERBOSITY.
VERBOSITY is a number between 0 and 3."
(when (>= native-comp-verbose verbosity)
(comp-log (format "\nFunction: %s\n" (comp-func-name func)) verbosity)
(cl-loop
for block-name being each hash-keys of (comp-func-blocks func)
using (hash-value bb)
do (comp-log (concat "<" (symbol-name block-name) ">") verbosity)
(cl-loop
for insn in (comp-block-insns bb)
do (comp-log (comp--prettyformat-insn insn) verbosity)))))