d90fbaeff4
The `scheme/base' module had become unreachable from the `mred' module. While that normally would be a good thing, it lead to troublesome multiple instantiations of `scheme/base' that caused problems for attaching further modules to the namespace.
10 lines
314 B
Racket
10 lines
314 B
Racket
#lang racket/base
|
|
(require racket/gui/base
|
|
racket/gui/dynamic)
|
|
;; Don't change this program to use `racket'; ths point
|
|
;; is to test `racket/gui/base' exports
|
|
|
|
(let ([ns ((gui-dynamic-require 'make-gui-namespace))]
|
|
[orig-ns (current-namespace)])
|
|
(namespace-attach-module orig-ns 'racket/base ns))
|