#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 … …+)