no #%plain-app because test is not a function...

2010-10-21 16:19:50 -05:00 · 2010-10-21 16:19:50 -05:00 · 22ce241d4d
commit 22ce241d4d
parent c34bd6c28d
1 changed files with 1 additions and 1 deletions
--- a/collects/lang/htdp-langs.rkt
+++ b/collects/lang/htdp-langs.rkt
@ -567,7 +567,7 @@
                     (cond
                       [(eof-object? ans)
                        (set! done? #t)
-                        #`(#%plain-app test)]
+                        #`(test)]
                       [else
                        ans]))]))))