---
 tests/streams.tst |    4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

--- a/tests/streams.tst
+++ b/tests/streams.tst
@@ -1036,8 +1036,8 @@ T
            (describe (make-array nil :element-type nil) s)))
 T
 
-(stringp (with-output-to-string (s) (describe nil s)))
-T
+;(stringp (with-output-to-string (s) (describe nil s)))
+;T
 
 ;; https://sourceforge.net/tracker/index.php?func=detail&aid=1622642&group_id=1355&atid=101355
 (let ((s "a   b"))