test case to finish repair for `racket/gui/init' load handler

Test case for b111241afe.
This commit is contained in:
Matthew Flatt 2012-07-18 05:03:50 -06:00
parent b342009e71
commit d44aa13c15

View File

@ -0,0 +1,6 @@
#lang racket/base
(require racket/gui/base)
(parameterize ([current-namespace (make-gui-namespace)])
(namespace-require 'racket/gui/init)
(void (load (collection-file-path "prog8.mre" "tests" "gracket"))))