/mixin/lang/reader.rkt

http://github.com/dyoo/mixin-lang · Racket · 12 lines · 7 code · 5 blank · 0 comment · 0 complexity · cd3b57811f780ad519a6c34246e04155 MD5 · raw file

  1. #lang racket/base
  2. (define (my-read in)
  3. (syntax->datum (my-read-syntax #f in)))
  4. (define (my-read-syntax src in)
  5. eof)
  6. (provide (rename-out [my-read read]
  7. [my-read-syntax read-syntax]))