Function: comp-form-tco-call-seq
comp-form-tco-call-seq is a byte-compiled function defined in
comp.el.gz.
Signature
(comp-form-tco-call-seq ARGS)
Documentation
Generate a TCO sequence for ARGS.
Source Code
;; Defined in /usr/src/emacs/lisp/emacs-lisp/comp.el.gz
;;; Tail Call Optimization pass specific code.
(defun comp-form-tco-call-seq (args)
"Generate a TCO sequence for ARGS."
`(,@(cl-loop for arg in args
for i from 0
collect `(set ,(make-comp-mvar :slot i) ,arg))
(jump bb_0)))