summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMatthias Benkard <code@mail.matthias.benkard.de>2009-10-08 12:16:33 +0200
committerMatthias Benkard <code@mail.matthias.benkard.de>2009-10-08 12:16:33 +0200
commitd81b572762820d1c1a023d7cde06325d4b11f3fa (patch)
tree7729d75c196b2b3d20584854eca6213e9867a151
parentbd1734b15ed4b8be99a1d151b9452230e09c2c88 (diff)
Add function DEBUG-LOG.
Ignore-this: 1521e8ded95ae1f8c5ae2e19dffeb36f darcs-hash:c6b5765a68033982747e15789d15769b7a52f98e
-rw-r--r--utils.lisp4
1 files changed, 4 insertions, 0 deletions
diff --git a/utils.lisp b/utils.lisp
index 4b09584..f49820e 100644
--- a/utils.lisp
+++ b/utils.lisp
@@ -23,6 +23,10 @@
(in-package #:mulk.journal)
+(defun debug-log (thing)
+ (format *error-output* "~S " thing)
+ thing)
+
(defun keywordify (thing)
(if (null thing)
thing