Name

macroexpand

Usage

builtin-function

Syntax

(macroexpand expr &optional environment)

Description

Returns the macro expansion of expr by repeatedly calling macroexpand-1.

user > (macroexpand '(setf (car x) 123))
it: (set-car x 123)
user > (macroexpand '(while a b))
it: (do
        (label test-label)
        (do
            (do
                (if (not a)
                    (goto break-label))
                b)
            (goto test-label))
        (label break-label dummy-value))