Great, thanks. <div class="gmail_quote">On Jul 29, 2014 10:34 PM, "Matthew Flatt" <<a href="mailto:mflatt@cs.utah.edu">mflatt@cs.utah.edu</a>> wrote: <blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"> Sorry that I lost track of this one. I've pushed a repair. At Tue, 29 Jul 2014 16:26:21 -0700, Sam Tobin-Hochstadt wrote: > Here's a simpler version of this problem: > > #lang racket > (parameterize ([current-namespace (make-base-namespace)]) > (expand (datum->syntax > #f > '(module m '#%kernel > (#%declare #:cross-phase-persistent))))) > > Sam > > On Wed, Jul 16, 2014 at 12:59 PM, Sam Tobin-Hochstadt > <<a href="mailto:samth@cs.indiana.edu">samth@cs.indiana.edu</a>> wrote: > > Running `expand` on the module defined in `racket/tcp` errors. > > > > In transcript form: > > > > -> (define p (open-input-file > > "/home/samth/sw/plt/racket/collects/racket/tcp.rkt")) > > -> (define mod (read-syntax (object-name p) p)) > > -> (parameterize ([current-namespace (make-base-namespace)]) > > (expand (namespace-syntax-introduce mod))) > > ; /home/samth/sw/plt/racket/collects/racket/tcp.rkt::2: module: cannot be > > ; cross-phase persistent due to required modules > > ; in: (#%module-begin (#%require (all-except (quote #%network) > tcp-addresses) > > ; (rename (quote #%network) c:tcp-addresses tcp-addresses)) (#%provide > > ; tcp-connect tcp-connect/enable-break tcp-listen tcp-close > > ; tcp-accept-ready? tcp-accept tcp-accept-evt tcp-accept... > > ; [,bt for context] > > > > I don't know why it would do this. The same thing happens with the > > minimal module that's declared cross-phase persistent. > > > > Sam > _________________________ > Racket Developers list: > <a href="http://lists.racket-lang.org/dev" target="_blank">http://lists.racket-lang.org/dev</a> </blockquote></div>