Re: [racket-users] create a new provide syntax

2017-03-10 Thread Dan Liebgold
On Friday, March 10, 2017 at 10:43:25 AM UTC-8, Stephen Chang wrote: > > (define-provide-syntax my-out > (syntax-parser > [(_ name:id) > #:with mk-name (format-id #'name "make-~a" #'name) > #'(combine-out name mk-name)])) > That does it. I guess define-provide-syntax *is* up to

Re: [racket-users] create a new provide syntax

2017-03-10 Thread Stephen Chang
combine-out may help simplify things? (define-syntax my-out (make-provide-transformer (lambda (stx modes) (syntax-parse stx ((_ name:id) #:with mk-name (format-id #'name "make-~a" #'name) (expand-export #'(combine-out name mk-name) modes)) or

[racket-users] create a new provide syntax

2017-03-10 Thread Dan Liebgold
Hi - I'd like to create a new provide syntax that essentially turns this: (provide (my-out name)) into this: (provide name make-name) where 'name' and 'make-name' are defined in the surrounding context. It looks like define-provide-syntax isn't up to the task, so I used