1.0.12.2: oops, test in wrong place

diff --git a/tests/smoke.impure.lisp b/tests/smoke.impure.lisp
index baeba31..716766c 100644 (file)
--- a/tests/smoke.impure.lisp
+++ b/tests/smoke.impure.lisp
@@ -72,4 +72,10 @@
   (assert (equal (funcall fn 1) '(1)))
   (assert (equal (funcall fn 1 2 3) '(1 2 3))))
 
+;; 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

diff --git a/tests/stream.impure.lisp b/tests/stream.impure.lisp
index a45561d..2db6606 100644 (file)
--- 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

diff --git a/version.lisp-expr b/version.lisp-expr
index b561f24..888b292 100644 (file)
--- a/version.lisp-expr
+++ b/version.lisp-expr
@@ -17,4 +17,4 @@
 ;;; checkins which aren't released. (And occasionally for internal
 ;;; versions, especially for internal versions off the main CVS
 ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".)
-"1.0.12.1"
+"1.0.12.2"