diff --git a/ansi-tests/print-level.lsp b/ansi-tests/print-level.lsp
index 6d5b1a732dc5245a6a6bdad935829f6a7247746a..b3ad0bd549b73ed8bb15bcb106986286b55169e9 100644
--- a/ansi-tests/print-level.lsp
+++ b/ansi-tests/print-level.lsp
@@ -7,6 +7,7 @@
 
 (compile-and-load "printer-aux.lsp")
 
+#|
 (deftest print-level.1
   (with-standard-io-syntax
    (let ((*print-readably* nil))
@@ -21,6 +22,7 @@
 		      (not (string= s2 "#")))
 	   collect (list x s1 s2))))
   nil)
+|#
 
 (defclass print-level-test-class nil (a b c))