Provide everything
This commit is contained in:
parent
4be72744a4
commit
6441a07c97
28
main.rkt
28
main.rkt
|
@ -1 +1,29 @@
|
||||||
#lang racket/base
|
#lang racket/base
|
||||||
|
(require subtemplate/ddd-forms
|
||||||
|
stxparse-info/case
|
||||||
|
stxparse-info/parse
|
||||||
|
subtemplate/unsyntax-preparse
|
||||||
|
subtemplate/top-subscripts
|
||||||
|
(only-in racket/base [... …])
|
||||||
|
(only-in stxparse-info/parse [...+ …+]))
|
||||||
|
(provide
|
||||||
|
;; ddd-forms
|
||||||
|
?@ ?@@ ?? ?attr ?cond ?if begin define let #%app #%intef-begin
|
||||||
|
;; stxparse-info/case
|
||||||
|
(all-from-out stxparse-info/case)
|
||||||
|
;; stxparse-info/parse
|
||||||
|
(all-from-out stxparse-info/parse)
|
||||||
|
;; subtemplate/unsyntax-preparse
|
||||||
|
(rename-out
|
||||||
|
[template-ddd template]
|
||||||
|
[subtemplate-ddd subtemplate]
|
||||||
|
[quasitemplate-ddd quasitemplate]
|
||||||
|
[quasisubtemplate-ddd quasisubtemplate]
|
||||||
|
[subtemplate-ddd syntax]
|
||||||
|
[quasisubtemplate-ddd quasisyntax])
|
||||||
|
;; subtemplate/top-subscripts
|
||||||
|
;; => #%top
|
||||||
|
(all-from-out subtemplate/top-subscripts)
|
||||||
|
;; aliases
|
||||||
|
…
|
||||||
|
…+)
|
|
@ -1,6 +1,8 @@
|
||||||
#lang racket/base
|
#lang racket/base
|
||||||
|
|
||||||
(provide quasitemplate-ddd
|
(provide template-ddd
|
||||||
|
subtemplate-ddd
|
||||||
|
quasitemplate-ddd
|
||||||
quasisubtemplate-ddd)
|
quasisubtemplate-ddd)
|
||||||
|
|
||||||
(require (rename-in stxparse-info/parse/experimental/template
|
(require (rename-in stxparse-info/parse/experimental/template
|
||||||
|
|
Loading…
Reference in New Issue
Block a user