naming glitch

7 years ago · b665cd72db
parent e4a39ee906
commit b665cd72db
1 changed files with 2 additions and 2 deletions
--- a/beautiful-racket-demo/basic-demo/tokenize-only.rkt
+++ b/beautiful-racket-demo/basic-demo/tokenize-only.rkt
@ -8,7 +8,7 @@
       #,@tokens)))
 (module+ reader (provide read-syntax))

-(define-macro (parser-only-mb TOKEN ...)
+(define-macro (tokenize-only-mb TOKEN ...)
  #'(#%module-begin
     (list TOKEN ...)))
-(provide (rename-out [parser-only-mb #%module-begin]))
+(provide (rename-out [tokenize-only-mb #%module-begin]))