GBBopen 1.2 Reference -- compiler-macroexpand-1

compiler-macroexpand-1

compiler-macroexpand-1 form &optional env => expansion, expanded-p [Function]

Purpose
Expand form if it is a compiler-macro form.

Package :gbbopen-tools

Module :gbbopen-tools

Arguments and values

form		A form
env		An environment object (default is `nil`)
expansion		A form
expanded-p		A generalized boolean

Returns
Two values:

if form is a compiler-macro form, then return the compiler-macro expansion of form and true
otherwise, return the given form and nil

Description
If form is a compiler-macro form, then compiler-macroexpand-1 expands the compiler-macro-form call once.

See also
compiler-macroexpand

Examples

  > (compiler-macroexpand-1 '(ensure-list x))
  (let ((#:g7105 x)) (if (listp #:g7105) #:g7105 (list #:g7105)))
  t
  > (compiler-macroexpand-1 '(cons x nil))
  (cons x nil)
  nil
  >

The GBBopen Project

compiler-macroexpand-1