Commit 7ce710dd authored by Eric Timmons's avatar Eric Timmons
Browse files

Print VCS diffs correctly on SBCL in client

Believe this is due to
parent 08bc94bc
......@@ -83,7 +83,8 @@ source, and finally new source."
(defun print-context-diff-to-stream (diff stream)
"Print a human readable description of DIFF to STREAM."
(let* ((column-lengths (context-diff-column-widths diff))
(let* ((*print-circle* nil)
(column-lengths (context-diff-column-widths diff))
(apply #'format nil "~~~D<~~A~~> ~
~~~D<~~@[~~A~~]~~> ~~~D<~~@[~~A~~]~~> ~
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