An anaphoric macro is a type of programming macro that deliberately captures some form supplied to the macro which may be referred to by an anaphor (an expression referring to another). Anaphoric macros first appeared in Paul Graham's On Lisp[1] and their name is a reference to linguistic anaphora[1] —the use of words as a substitute for preceding words.
The loop
macro in ANSI Common Lisp is anaphoric in binding, where the it
expression refers to the result of the test expression in a clause.[2] [3]
Here is an example that sums the value of non-nil
elements, where it
refers to the values of elements that do not equal nil
:
Here it
is bound to the output of (and (> number 3) number)
when true, collecting numbers larger than 3:[4]
One example is an anaphoric version of the if-then-else construct, which introduces an anaphor it
, bound to the result of the test clause:[5]
(aif (+ 2 7) (format nil "~A does not equal NIL." it) (format nil "~A does equal NIL." it)) ;; ⇒ "9 does not equal NIL."
Another example is an anaphoric version of the λ-function, which binds the function itself to the anaphor self
, allowing it to recur:[5]
;; Factorial function defined recursively where `self' refers to the alambda function (alambda (n) (if (= n 0) 1 (* n (self (1- n)))))