X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/6e21a5d25bca57a78f052d6a24b97b88e83cc6fb..d0b51392829a7360833694df5dcb2bdc96e3606f:/src/c-types-test.lisp

diff --git a/src/c-types-test.lisp b/src/c-types-test.lisp
index 6022991..06af0d4 100644
--- a/src/c-types-test.lisp
+++ b/src/c-types-test.lisp
@@ -58,6 +58,7 @@
 
 (defun assert-pp-ctype (type kernel string)
   (let* ((*print-right-margin* 77)
+	 (*print-pretty* t)
 	 (print (with-output-to-string (out)
 		  (pprint-c-type type out kernel))))
     (assert-equal (expand-tabs print) (expand-tabs string)