[racket-dev] [plt] Push #27163: master branch updated
I moved all of distributed places to a new package, which required the
one change below. I'm not sure about whether this is a good idea,
particularly because neither the `#:at` or `#:named` arguments to
`dynamic-place` are mentioned at all in the documentation. Thoughts?
Sam
On Thu, Jul 18, 2013 at 3:25 PM, <samth at racket-lang.org> wrote:
>
> racket/lib/collects/racket/place.rkt
> ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
> --- OLD/racket/lib/collects/racket/place.rkt
> +++ NEW/racket/lib/collects/racket/place.rkt
> @@ -81,7 +81,11 @@
> (define (dynamic-place module-path function #:at [node #f] #:named [named #f])
> (cond
> [node
> - (supervise-place-at node module-path function #:named named)]
> + (unless (collection-file-path "distributed.rkt" "racket" "place"
> + #:fail (lambda (x) #f))
> + (raise-arguments-error "dynamic-place"
> + "distributed places are not available"))
> + (supervise-place-at node module-path function #:named named)]
> [else
> (start-place 'dynamic-place module-path function
> #f (current-output-port) (current-error-port))]))