Name

macroexpand-1

Usage

builtin-function

Syntax

(macroexpand-1 expr &optional environment)

Description

Returns a list with the macro expansion of expr and a flag indicating that expansion actually occurred.

user 1 > (macroexpand-1 '(setf (car x) 123))
it: ((set-car x 123) true)
user 2 > (macroexpand-1 '(while a b))
it: ((loop (break-if (not a)) b) true)
user 3 > (macroexpand-1 '(if a b))
it: ((if a b) false)