diff --git a/src/tests/config.lsp.in b/src/tests/config.lsp.in
index a0525775c..69ba7f88f 100755
--- a/src/tests/config.lsp.in
+++ b/src/tests/config.lsp.in
@@ -241,7 +241,11 @@
     (with-open-file (s tmp :direction :output
 		       :if-exists :supersede
 		       :if-does-not-exist :create)
-      (format s "(require :cmp)(pprint (ext:getcwd))(load ~S)#+ecl(quit)"
+      (format s "(require :cmp)
+#+ecl(setf c::*suppress-compiler-messages* '(or c::compiler-note c::style-warning))
+(pprint (ext:getcwd))
+(load ~S)
+#+ecl(quit)"
 	      (namestring input)))
     (unwind-protect
 	(progn