From 55b9e9dc91ef4ea3412488e4ed65ed03b2426340 Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Thu, 10 Jan 2013 09:57:10 +0100
Subject: [PATCH] Suppress compiler warnings when running the ANSI tests

---
 src/tests/config.lsp.in | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

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