Why not just use the one from the teaching language instead of breaking hygiene?
Robby On Tue, Aug 3, 2010 at 7:02 AM, Todd O'Bryan <[email protected]> wrote: > I'm trying to write a macro to provide functional mutators for the > teaching languages. Here's the main construct: > > (define-syntax (define-struct-with-setters stx) > (syntax-case stx () > [(_ id fields) > (let ([field-names (syntax->list #'fields)]) > #`(begin > (define-struct id fields #:transparent) > #,@(for/list ([f field-names]) > (setter #'id field-names f))))])) > > Everything works, mostly. The problem is that this uses define-struct > from #lang racket instead of the teaching language where the macro is > invoked. (Thus, the #:transparent argument.) I know there's some way > to get define-struct evaluated in the environment of the macro's use > instead of its definition, but I can't get it to work. > > Is there a way to fix it? > > Thanks, > Todd > _________________________________________________ > For list-related administrative tasks: > http://lists.racket-lang.org/listinfo/users > _________________________________________________ For list-related administrative tasks: http://lists.racket-lang.org/listinfo/users
