diff --git a/collects/tests/drscheme/module-lang-test.ss b/collects/tests/drscheme/module-lang-test.ss index 3e2509f0f3..8a3f518856 100644 --- a/collects/tests/drscheme/module-lang-test.ss +++ b/collects/tests/drscheme/module-lang-test.ss @@ -208,3 +208,12 @@ Module Language: invalid language specification Interactions disabled} #t) + +(test @t{#lang scheme/load + (module m mzscheme (provide x) (define x 2)) + (require 'm) + (printf "~s\n" x) + (flush-output)} + #f + @t{2}) +