[racket-dev] [plt] Push #26623: master branch updated

Did you consider adding a test case?

Robby


On Fri, Apr 12, 2013 at 12:23 AM, <eli at racket-lang.org> wrote:

> eli has updated `master' from a425ee5207 to b5771e6ade.
>   http://git.racket-lang.org/plt/a425ee5207..b5771e6ade
>
> =====[ One Commit ]=====================================================
> Directory summary:
>  100.0% collects/xrepl/
>
> ~~~~~~~~~~
>
> b5771e6 Eli Barzilay <eli at racket-lang.org> 2013-04-12 01:18
> :
> | Avoid loading modules in `module->path' and `known-module'.
> |
> | This is particularly problematic for `require-reloadable'.
> |
> | Closes PR 13688.
> :
>   M collects/xrepl/xrepl.rkt | 4 ++--
>
> =====[ Overall Diff ]===================================================
>
> collects/xrepl/xrepl.rkt
> ~~~~~~~~~~~~~~~~~~~~~~~~
> --- OLD/collects/xrepl/xrepl.rkt
> +++ NEW/collects/xrepl/xrepl.rkt
> @@ -79,7 +79,7 @@
>      [_ (or (with-handlers ([exn:fail? (λ (_) #f)])
>               (define r
>                 (resolved-module-path-name
> -                ((current-module-name-resolver) mod #f #f)))
> +                ((current-module-name-resolver) mod #f #f #f)))
>               (if (not mode)
>                 (and r mod)
>                 ;; sanity check that path results exists
> @@ -89,7 +89,7 @@
>             ;; for symbols, try also 'mod
>             (and (symbol? mod) (known-top `',mod)))]))
>  (define (module->path module)
> -  (resolved-module-path-name ((current-module-name-resolver) module #f
> #f)))
> +  (resolved-module-path-name ((current-module-name-resolver) module #f #f
> #f)))
>
>  (define (mpi->name mpi)
>    (resolved-module-path-name (module-path-index-resolve mpi)))
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.racket-lang.org/dev/archive/attachments/20130412/98af6355/attachment.html>