From e711cace1515ce41ff9d6c46d8421396d7c098ef Mon Sep 17 00:00:00 2001
Message-Id: <e711cace1515ce41ff9d6c46d8421396d7c098ef.1719313259.git.mdw@distorted.org.uk>
From: Mark Wooding <mdw@chiark.greenend.org.uk>
Date: Fri, 2 Jun 2006 17:03:34 +0100
Subject: [PATCH 1/1] runlisp: Clobber *compile-print* as well.
Organization: Straylight/Edgeware

From: Mark Wooding <mdw@ncipher.com>

---
 runlisp.lisp | 1 +
 1 file changed, 1 insertion(+)

diff --git a/runlisp.lisp b/runlisp.lisp
index 902b6ad..6d8e20e 100644
--- a/runlisp.lisp
+++ b/runlisp.lisp
@@ -43,6 +43,7 @@ (set-dispatch-macro-character #\# #\!
 #+cmu (setf ext:*gc-verbose* nil)
 (defun suyb ()
   (setf *compile-verbose* nil
+	*compile-print* nil
 	*load-verbose* nil
 	*load-print* nil))
 #-cmu (suyb)
-- 
[mdw]