Hash : a64ff2d3 Author : Thomas de Grivel Date : 2018-06-16T16:43:33
Download
1 2 3 4 5 6 7 8 9 10 11
(in-package :thot) (defmacro msg (level &rest parts) `(progn (write-str *standard-output* ,(symbol-name level) #\Space ,@parts #\Newline) (force-output)))