I can't think of a good alternative, and a way to provide a name for the static info sounds fine to me.
At Sun, 10 Apr 2016 18:33:49 +0200, Jens Axel Søgaard wrote: > Ping. > > 2016-04-02 22:26 GMT+02:00 Jens Axel Søgaard <[email protected]>: > > > Consider this snippet from scribble/html/xml > > > > (provide make-element) > > (struct element (tag attrs body [cache #:auto #:mutable]) > > #:constructor-name make-element > > #:transparent #:omit-define-syntaxes #:auto-value #f > > #:property prop:procedure > > (lambda (e) > > (unless (element-cache e) (set-element-cache! e (element->output e))) > > (element-cache e))) > > > > (provide element) > > (define (element tag . args) > > (define-values [attrs body] (attributes+body args)) > > (make-element tag attrs body)) > > > > I would like to provide the structure definition, but simply adding (provide > > (struct-out element)) does not work, since element is not bound to the > > structure id. > > > > An #:extra-id-name option for struct could solve this. > > > > Is there another way to provide the struct element without renaming the > > element function? > > > > /Jens Axel > > > > > > > > > > > > -- > > -- > > Jens Axel Søgaard > > > > > > > -- > -- > Jens Axel Søgaard > > -- > You received this message because you are subscribed to the Google Groups > "Racket Developers" group. > To unsubscribe from this group and stop receiving emails from it, send an > email to [email protected]. > To post to this group, send email to [email protected]. > To view this discussion on the web visit > https://groups.google.com/d/msgid/racket-dev/CABefVgwdePmoo556iL_%2BVj0d5_dpFux > Z-WR_bsP43nqVRhy_DQ%40mail.gmail.com. > For more options, visit https://groups.google.com/d/optout. -- You received this message because you are subscribed to the Google Groups "Racket Developers" group. To unsubscribe from this group and stop receiving emails from it, send an email to [email protected]. To post to this group, send email to [email protected]. To view this discussion on the web visit https://groups.google.com/d/msgid/racket-dev/20160411151042.1982D65006F%40mail-svr1.cs.utah.edu. For more options, visit https://groups.google.com/d/optout.
