Name

macroexpand-all

Usage

builtin-function

Syntax

(macroexpand-all form)
(macroexpand-all form env)

Recursively expands all macros in form.

user > (macroexpand-all '(do (var x 1) (while (test x) (incf x))))
it: (do
        (var x 1)
        (do
            (label test-label)
            (do
                (do
                    (if (not (test x))
                        (goto break-label))
                    (do
                        (let temp:new-108 (inc x))
                        (setq x temp:new-108)))
                (goto test-label))
            (label break-label dummy-value)))