Add examples to make-require-transformer

This commit is contained in:
Leif Andersen 2016-01-21 12:01:30 -05:00
parent 10c934aec0
commit 34cfe48355

View File

@ -1094,7 +1094,23 @@ former list).}
require-transformer?]{
Creates a @tech{require transformer} using the given procedure as the
transformer.}
transformer.
Often used in combination with @racket[expand-import].
@examples[
#:eval stx-eval
(require (for-syntax racket/require-transform))
(define-syntax printing
(make-require-transformer
(lambda (stx)
(syntax-case stx ()
[(_ path)
(printf "Importing: ~a~n" #'path)
(expand-import #'path)]))))
(require (printing racket/match))
]}
@defthing[prop:require-transformer struct-type-property?]{