From 53c4ee32556eed86fc04957647a87a705744d2f7 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Tue, 15 Apr 2008 14:13:43 +0000 Subject: [PATCH] update tests for empty vector svn: r9318 --- collects/tests/mzscheme/basic.ss | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/collects/tests/mzscheme/basic.ss b/collects/tests/mzscheme/basic.ss index 27acbd44da..20addb9c99 100644 --- a/collects/tests/mzscheme/basic.ss +++ b/collects/tests/mzscheme/basic.ss @@ -301,7 +301,8 @@ (test #f immutable? 1) (test #t immutable? #(1 2 3)) (test #f immutable? (vector 1 2 3)) -(test #f immutable? #()) +(test #f immutable? (vector)) +(test #t immutable? #()) (test #f immutable? (string-copy "hi")) (test #t immutable? "hi")