tweak

8 years ago · 0ad47dd273
parent cc4b7d358c
commit 0ad47dd273
1 changed files with 3 additions and 3 deletions
--- a/beautiful-racket-demo/basic-demo-2/misc.rkt
+++ b/beautiful-racket-demo/basic-demo-2/misc.rkt
@ -10,7 +10,7 @@
 (define-macro (b-let ID VAL) #'(set! ID VAL))

 (define-macro (b-input ID)
-  #'(set! ID (let* ([str (read-line)]
+  #'(b-let ID (let* ([str (read-line)]
                     [num (string->number (string-trim str))])
                (or num str))))