0. #lang racket
1.  
2. (module* editor racket
3.   (require syntax/location)
4.   (define this-ns (current-namespace))
5.   (define ns (make-base-namespace))
6.   (parameterize ([current-namespace ns])
7.     (namespace-attach-module-declaration this-ns (quote-module-path ".." foo))
8.     (namespace-require/expansion-time (quote-module-path ".." foo))
9.     (eval 'y)))
10.  
11. (module* foo racket
12.   (define y (let () 8))
13.   (provide y))

=>