From 8061c07a9dd9f7283409c56f145f9e11c3207059 Mon Sep 17 00:00:00 2001 From: Eli Barzilay Date: Fri, 30 Oct 2009 02:28:38 +0000 Subject: [PATCH] fix one broken test, remove another bogus test svn: r16460 --- collects/tests/mzscheme/for.ss | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/collects/tests/mzscheme/for.ss b/collects/tests/mzscheme/for.ss index 76de87feb0..8f5773b37a 100644 --- a/collects/tests/mzscheme/for.ss +++ b/collects/tests/mzscheme/for.ss @@ -132,8 +132,7 @@ (test-generator [(65 66 67)] (in-input-port-bytes (open-input-bytes #"ABC"))) (test-generator [(1 2 3)] (in-port read (open-input-string "1 2 3"))) -(test-generator [(123)] (in-port read (open-input-string "123"))) -(test-generator [(65 66 67)] (in-port read-bytes (open-input-bytes "ABC"))) +(test-generator [(65 66 67)] (in-port read-byte (open-input-string "ABC"))) (test-generator [(0 1 2 3 4 5)] (in-sequences (in-range 6))) (test-generator [(0 1 2 3 4 5)] (in-sequences (in-range 4) '(4 5)))