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.
23 lines
573 B
Racket
23 lines
573 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 body ...)
|
|
(#%module-begin
|
|
(module inner pollen/lang/doclang_raw
|
|
main
|
|
(λ(x) (apply string-append (cdr x))) ;; chop first linebreak with cdr
|
|
()
|
|
(require pollen/main-helper pollen/top)
|
|
(require-and-provide-extras)
|
|
(provide (all-defined-out))
|
|
|
|
body ...)
|
|
|
|
(require 'inner)
|
|
(provide (all-from-out 'inner))
|
|
|
|
(module+ main
|
|
(display main))))
|
|
|