On 06/02/2017 02:05 PM, David Storrs wrote:
> Suppose I have the following:
> [...]

One possible option is http://pkgs.racket-lang.org/package/struct-defaults:

~$ racket
Welcome to Racket v6.6.0.4.
> (require struct-defaults)
> (struct my-exn exn:fail ())
> (define-struct-defaults mk-my-exn my-exn ([exn-message "Oh dear!"]))
> (mk-my-exn (current-continuation-marks))
(my-exn "Oh dear!" #<continuation-mark-set> ...)
> (mk-my-exn (current-continuation-marks) "Huh, that's odd")
(my-exn "Huh, that's odd" #<continuation-mark-set> ...)

My apologies for the lack of documentation. The test module+ in the
collect's main.rkt shows most of the features of the library.

Regards,
  Tony

-- 
You received this message because you are subscribed to the Google Groups 
"Racket Users" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to [email protected].
For more options, visit https://groups.google.com/d/optout.

Reply via email to