Name

macroexpand-all

Usage

builtin-function

Syntax

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

Recursively expands all macros in form.

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