summaryrefslogtreecommitdiff
path: root/test-suite/tests/vectors.test
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/tests/vectors.test')
-rw-r--r--test-suite/tests/vectors.test6
1 files changed, 1 insertions, 5 deletions
diff --git a/test-suite/tests/vectors.test b/test-suite/tests/vectors.test
index 97b3f187a..6db608c8e 100644
--- a/test-suite/tests/vectors.test
+++ b/test-suite/tests/vectors.test
@@ -41,11 +41,7 @@
(pass-if "string-vector 2"
(equal? '("abc\u0100" "def\u0101" "ghi\u0102")
- (vector->list #("abc\u0100" "def\u0101" "ghi\u0102"))))
-
- (pass-if "shared array"
- (let ((b (make-shared-array #(1) (lambda (x) '(0)) 2)))
- (equal? b (list->vector (vector->list b))))))
+ (vector->list #("abc\u0100" "def\u0101" "ghi\u0102")))))
(with-test-prefix "make-vector"