suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

removed tests for now

Browse Source 
svn: r15813
This commit is contained in:
Eli Barzilay 2009-08-27 12:17:28 +00:00
parent 572f7f849b
commit caf1c21d3f
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
collects/tests/mzscheme/for.ss
View File

@ -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)