Commit d2bf5a92 authored by camm's avatar camm

Michael Koehne's ansi patches, Thanks!

parent d0e3245f
......@@ -112,7 +112,7 @@
(with-standard-io-syntax (format *debug-io* "~%~A~%" params)))
(finish-output *debug-io*))
(setf (readtable-case *readtable*) readcase)
; (setf (readtable-case *readtable*) readcase)
(let* ((str (handler-case
(with-output-to-string (s) (write obj :stream s))
(print-not-readable
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment