Fix make-array transforms.

[sbcl.git] / tests / static-alloc.impure.lisp

diff --git a/tests/static-alloc.impure.lisp b/tests/static-alloc.impure.lisp
index 4bdd538..a23a708 100644 (file)
--- a/tests/static-alloc.impure.lisp
+++ b/tests/static-alloc.impure.lisp
@@ -2,7 +2,7 @@
 (dolist (type '(single-float double-float (unsigned-byte 8)
                 (unsigned-byte 32) (signed-byte 32)))
   (let* ((vectors (loop
-                     for i upto 1024
+                     for i upto 128
                      collect (sb-int:make-static-vector
                               256 :element-type type)))
          (saps (mapcar #'sb-sys:vector-sap vectors)))