Plaster
New
List
Login
common-lisp
default
anonymous
2021.04.09 09:44:12
(defmacro mac (x &environment e) (unless (cltl2:function-information x e) (warn "~s appears to be unbound!" x)) `(,x 1)) (mac print) ; no warning (mac preent) ; warning (flet ((x (n) (+ n 2))) (mac x)) ; no warning
Raw
Annotate
Repaste
Edit