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

fixed test with display line

Browse Source
This commit is contained in:
Matthias Felleisen 2013-10-04 15:11:03 -04:00
parent e9ee4c4504
commit bbe1cc9ab6
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
pkgs/htdp-pkgs/htdp-test/2htdp/tests/stop-when-crash.rkt
View File

@ -8,4 +8,5 @@
(with-handlers ((exn:fail? void)) (with-handlers ((exn:fail? void))
(big-bang 0 (big-bang 0
(on-draw (λ _ (empty-scene 500 500))) (on-draw (λ _ (empty-scene 500 500)))
(stop-when (λ _ (car '()))))) (stop-when (λ _ (car '()))))
(displayln '(*** something went wrong in stop-when crash ***)))