Name

macroexpand

Usage

builtin-function

Syntax

(macroexpand expr &optional environment)

Description

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

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