diff --git a/ansi-tests/rt/rt.lsp b/ansi-tests/rt/rt.lsp
index d00b2cdb213264fd1e33c2f7380b5f6ce0d89d4a..c3f6865b31c771db73fd2b5e683415bf1e16a6b0 100644
--- a/ansi-tests/rt/rt.lsp
+++ b/ansi-tests/rt/rt.lsp
@@ -124,7 +124,7 @@
     (setq *test* (name entry))
     (setf (pend entry) t)
     (let* ((*in-test* t)
-	   (*break-on-warnings* t)
+	   ;; (*break-on-warnings* t)
 	   (aborted nil)
 	   (r (if *catch-errors*
 		  (handler-case (multiple-value-list