Plaster

common-lisp
(defmacro fbind (bindings &body body) "Binds the function objects in the function namespace." `(flet ,(loop with gensym = (gensym) for (name function) in bindings collect `(,name (&rest ,gensym) (apply ,function ,gensym))) ,@body))

Annotations