missing `val`

6 years ago · 2e61ddab8d
parent ac8aadb6bf
commit 2e61ddab8d
1 changed files with 1 additions and 1 deletions
--- a/beautiful-racket-demo/wires-demo/main.rkt
+++ b/beautiful-racket-demo/wires-demo/main.rkt
@ -27,7 +27,7 @@
  #'(begin
      (define (ID) BODY)
      (module+ main
-        (displayln (format "~a: ~a" 'ID (ID))))))
+        (displayln (format "~a: ~a" 'ID (val ID))))))

 (define val
  (let ([val-cache (make-hash)])