diff --git a/collects/tests/mzscheme/for.ss b/collects/tests/mzscheme/for.ss
index a75e8b40c4..e21941813c 100644
--- a/collects/tests/mzscheme/for.ss
+++ b/collects/tests/mzscheme/for.ss
@@ -215,9 +215,9 @@
   (test 13 next)
   (test #f more?))
 
-(test-generator [(0 1 2)] ((lambda-generator () (yield 0) (yield 1) (yield 2))))
-(test-generator [(0 1 2)] (in-generator (yield 0) (yield 1) (yield 2)))
-(test '((1 0) (2 1) (3 2)) 'indexed-generator (for/list ([(x i) (in-indexed (in-generator (yield 1) (yield 2) (yield 3)))])
-                                                        (list x i)))
+;; (test-generator [(0 1 2)] ((lambda-generator () (yield 0) (yield 1) (yield 2))))
+;; (test-generator [(0 1 2)] (in-generator (yield 0) (yield 1) (yield 2)))
+;; (test '((1 0) (2 1) (3 2)) 'indexed-generator (for/list ([(x i) (in-indexed (in-generator (yield 1) (yield 2) (yield 3)))])
+;;                                                         (list x i)))
 
 (report-errs)