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

fixing how to count

Browse Source
This commit is contained in:
Matthias Felleisen 2014-04-17 10:50:54 -04:00
parent 4872bdfb2f
commit f4f925d4d1
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/htdp-pkgs/htdp-test/2htdp/tests/record.rkt
View File

@ -21,8 +21,8 @@
#:exists 'replace) #:exists 'replace)
(define final-world (define final-world
(big-bang 0 (big-bang 0
(on-tick add1) (on-tick add1 1)
(stop-when (curry = n)) (stop-when (lambda (k) (>= k (- n 1))))
(on-draw draw-number) (on-draw draw-number)
(record? dir))) (record? dir)))
(sleep 1) (sleep 1)