Doug, does this concrete example concerning printing help: #lang racket/load
(module a racket/base (struct xml (bar) #:transparent) (define x (xml "bar")) (displayln x) (provide (struct-out xml) x)) (module b racket/base (require 'a) (struct my xml () #:property prop:custom-write (lambda (x p z) (displayln "<my xml>" p))) (define y (my "bar")) (displayln y)) (require 'b) _________________________________________________ For list-related administrative tasks: http://lists.racket-lang.org/listinfo/dev