summaryrefslogtreecommitdiff
path: root/testsuite/tests/ghc-regress/rename/prog004
diff options
context:
space:
mode:
authorsimonpj <unknown>2002-09-25 15:31:47 +0000
committersimonpj <unknown>2002-09-25 15:31:47 +0000
commite20883c64d15d40602350507ecfe9b750678bd88 (patch)
tree6a1e85e17b7659ba048586f2efc52b6b340f7979 /testsuite/tests/ghc-regress/rename/prog004
parenta44d6181d57e55b487d469dea08fd1aa081292df (diff)
downloadhaskell-e20883c64d15d40602350507ecfe9b750678bd88.tar.gz
[project @ 2002-09-25 15:31:47 by simonpj]
Add exporting test (from Ross P)
Diffstat (limited to 'testsuite/tests/ghc-regress/rename/prog004')
-rw-r--r--testsuite/tests/ghc-regress/rename/prog004/A.hs6
-rw-r--r--testsuite/tests/ghc-regress/rename/prog004/B.hs4
-rw-r--r--testsuite/tests/ghc-regress/rename/prog004/C.hs7
-rw-r--r--testsuite/tests/ghc-regress/rename/prog004/Makefile3
-rw-r--r--testsuite/tests/ghc-regress/rename/prog004/rename.prog004.stderr2
-rw-r--r--testsuite/tests/ghc-regress/rename/prog004/test.T2
6 files changed, 24 insertions, 0 deletions
diff --git a/testsuite/tests/ghc-regress/rename/prog004/A.hs b/testsuite/tests/ghc-regress/rename/prog004/A.hs
new file mode 100644
index 0000000000..23fe5bb187
--- /dev/null
+++ b/testsuite/tests/ghc-regress/rename/prog004/A.hs
@@ -0,0 +1,6 @@
+module A(foo, Bar(..)) where
+
+foo :: Bar
+foo = MkBar 42
+
+data Bar = MkBar Int
diff --git a/testsuite/tests/ghc-regress/rename/prog004/B.hs b/testsuite/tests/ghc-regress/rename/prog004/B.hs
new file mode 100644
index 0000000000..47d2903abb
--- /dev/null
+++ b/testsuite/tests/ghc-regress/rename/prog004/B.hs
@@ -0,0 +1,4 @@
+module B(module A) where
+
+import A hiding (Bar)
+import A(Bar)
diff --git a/testsuite/tests/ghc-regress/rename/prog004/C.hs b/testsuite/tests/ghc-regress/rename/prog004/C.hs
new file mode 100644
index 0000000000..e66231afec
--- /dev/null
+++ b/testsuite/tests/ghc-regress/rename/prog004/C.hs
@@ -0,0 +1,7 @@
+module C where
+
+import B
+
+baz :: Bar
+baz = foo
+
diff --git a/testsuite/tests/ghc-regress/rename/prog004/Makefile b/testsuite/tests/ghc-regress/rename/prog004/Makefile
new file mode 100644
index 0000000000..1c39d1c1fe
--- /dev/null
+++ b/testsuite/tests/ghc-regress/rename/prog004/Makefile
@@ -0,0 +1,3 @@
+TOP=../../../..
+include $(TOP)/mk/boilerplate.mk
+include $(TOP)/mk/test.mk
diff --git a/testsuite/tests/ghc-regress/rename/prog004/rename.prog004.stderr b/testsuite/tests/ghc-regress/rename/prog004/rename.prog004.stderr
new file mode 100644
index 0000000000..b5bc74c268
--- /dev/null
+++ b/testsuite/tests/ghc-regress/rename/prog004/rename.prog004.stderr
@@ -0,0 +1,2 @@
+
+B.hs:3: Type constructor or class not in scope: `Class'
diff --git a/testsuite/tests/ghc-regress/rename/prog004/test.T b/testsuite/tests/ghc-regress/rename/prog004/test.T
new file mode 100644
index 0000000000..7c43525816
--- /dev/null
+++ b/testsuite/tests/ghc-regress/rename/prog004/test.T
@@ -0,0 +1,2 @@
+test('rename.prog004', normal, multimod_compile, \
+ ['C', '-v0'])