You cannot select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
beautiful-racket/beautiful-racket-lib/br/quicklang.rkt

17 lines
528 B
Racket

#lang br
(require (for-syntax racket/list sugar/debug))
(provide (except-out (all-from-out br) #%module-begin)
(rename-out [quicklang-mb #%module-begin])
(for-syntax (all-from-out sugar/debug)))
(define-macro (quicklang-mb . EXPRS)
#'(#%module-begin
(provide #%top #%app #%datum #%top-interaction)
. EXPRS))
(module reader syntax/module-reader
#:language 'br/quicklang
#:info br-get-info
#:read at:read
#:read-syntax at:read-syntax
(require br/get-info (prefix-in at: scribble/reader)))