[project @ 1997-10-07 14:50:40 by simonm]

test for qualified Prelude bug

diff --git a/ghc/tests/reader/should_compile/read001.hs b/ghc/tests/reader/should_compile/read001.hs
new file mode 100644 (file)
index 0000000..6b8f86e
--- /dev/null
+++ b/ghc/tests/reader/should_compile/read001.hs
@@ -0,0 +1,8 @@
+--!!! import qualified Prelude should leave (), [] etc in scope
+
+module ShouldCompile where
+
+import qualified Prelude
+
+f :: Prelude.IO ()
+f = Prelude.return ()