diff --git a/tools/comcom.lisp b/tools/comcom.lisp
index 635cec1fab4d56931d80d5dd8fe471c6deaffcd7..2e541f3c66ac7557807400c74241d32c194817b4 100644
--- a/tools/comcom.lisp
+++ b/tools/comcom.lisp
@@ -2,6 +2,9 @@
 ;;;
 (in-package "USER")
 
+(c::%proclaim '(optimize (speed 2) (space 2) (c::brevity 2)))
+(setq *print-pretty* nil)
+
 (with-compiler-log-file ("c:compile-compiler.log")
 
 (unless *new-compile*