X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tests%2Fstream.impure.lisp;h=2db66068f255faceb730c3c3e4e8533f02bfcf23;hb=02d7495253b9075e4d86275590c3e827c814b596;hp=a45561de082f307f202ea9901472c6cba782780e;hpb=236ff428ec33a3c55a7c2248027aaad3c19588ff;p=sbcl.git diff --git a/tests/stream.impure.lisp b/tests/stream.impure.lisp index a45561d..2db6606 100644 --- a/tests/stream.impure.lisp +++ b/tests/stream.impure.lisp @@ -442,10 +442,4 @@ (when (probe-file test) (delete-file test))))) -;; ROOM used to bail out when there were object with bignum bytes in -;; them. Test by Sidney Markowitz. -(defparameter *large-array* - (make-array (- (truncate most-positive-fixnum 4) 2))) -(room) - ;;; success