Plaster
New
List
Login
text
default
anonymous
2021.06.18 19:32:15
(defmacro decorate (name &body body) `(progn (format t "~&----- header ~a -----~%" ,name) ,@body (format t "~&----- footer ~a -----~%"))) (decorate block1 (format t "block1: content line 1~%") (format t "block1: content line 2~%"))
Raw
Annotate
Repaste
Edit