KMRCLを眺める(211) FIXME — #:g1

Posted 2010-10-07 11:33:00 GMT

今回は、KMRCLのconsole.lispからFIXMEです。
FIXMEやXXXはコメントの中でお馴染ですが、そのFIXMEを(ログに)出力するもののようです。
定義はこれまでの、CMSG等と同じ感じで

(defun fixme (template &rest args)
  "Format output to console"
  (setq template (concatenate 'string "~&;; ** FIXME ** " template "~%"))
  (apply #'format t template args)
  (values))
となっています。
動作は
(kl:fixme "now")
;→ ;; ** FIXME ** now
といったところ。
なんでもCLで書いてるとこういうのも必要になってくるんでしょうね。

comments powered by Disqus