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

add infinite-generator macro. change name infinite to make-repeat-generator

Browse Source 
svn: r17555
This commit is contained in:
Jon Rafkind 2010-01-07 22:28:37 +00:00
parent b7f9899439
commit f5ea84cbb4
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -248,8 +248,8 @@
(list (g1) (g2) (g1) (g2) (g1) (g2) (g1) (g2))))
(test '(1 2 3 1 2 3)
'infinite-generator
(let ([maker (infinite '(1 2 3))])
'repeat-generator
(let ([maker (make-repeat-generator '(1 2 3))])
(list (maker) (maker) (maker)
(maker) (maker) (maker))))