Solution to lisp-koan's final koan of macros.lsp

log-form-with-value.lsp

(defmacro log-form-with-value (&body body)
  "records the body form, and the form's return value
   to the list *log-with-value* and then evalues the body normally"
  `(let ((logform nil)
         (retval ,@body))
     ;; 有沒有不需要list的解法? 試不出來QQ
     (push (list :form ',@body :value retval) *log-with-value*)
     retval))