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.
21 lines
489 B
Racket
21 lines
489 B
Racket
#lang racket/base
|
|
|
|
(provide (except-out (all-from-out racket/base) #%module-begin)
|
|
(rename-out [module-begin #%module-begin]))
|
|
|
|
(define-syntax-rule (module-begin expr ...)
|
|
(#%module-begin
|
|
(module inner pollen/lang/doclang_raw
|
|
main
|
|
(λ(x) (apply string-append (cdr x))) ;; chop first linebreak off
|
|
()
|
|
(provide (all-defined-out))
|
|
|
|
expr ...)
|
|
|
|
(require 'inner)
|
|
(provide (all-from-out 'inner))
|
|
|
|
(module+ main
|
|
(display main))))
|
|
|