Macro

Summary

Returns a body of code with each specified name bound to a similar name.

Package

lispworks

Signature

with-unique-names (&rest names ) &body body => result

Arguments

names

The names to be rebound in body .

body

The body of code within which names are rebound.

Values

result

The result of evaluating body .

Description

Returns the body with each name bound to a symbol of a similar name (compare gensym ).

Example

After defining

(defmacro lister (p q)

   (with-unique-names (x y)

      `(let ((,x (x-function))

             (,y (y-function)))

          (list ,p ,q ,x ,y))))

the form (lister i j) macroexpands to

(LET* ((#:X-88 (X-FUNCTION))

       (#:Y-89 (Y-FUNCTION)))

          (LIST i j #:X-88 #:Y-89))

See also

rebinding