runlisp: Clobber *compile-print* as well.

[runlisp] / runlisp.lisp

diff --git a/runlisp.lisp b/runlisp.lisp
index 902b6ad..6d8e20e 100644 (file)
--- a/runlisp.lisp
+++ b/runlisp.lisp
@@ -43,6 +43,7 @@
 #+cmu (setf ext:*gc-verbose* nil)
 (defun suyb ()
   (setf *compile-verbose* nil
+       *compile-print* nil
        *load-verbose* nil
        *load-print* nil))
 #-cmu (suyb)