Add instances, build renaming environment, start on the renamer

3 files changed, 12 insertions, 3 deletions

diff --git a/examples/hide-bug/B.hs b/examples/hide-bug/B.hs
index 7c5b9dfe..f2ef544a 100644
--- a/examples/hide-bug/B.hs
+++ b/examples/hide-bug/B.hs
@@ -1 +1,3 @@
-module B(f, T) where import A
+module B(Test) where 
+
+data Test = Test
diff --git a/examples/hide-bug/C.hs b/examples/hide-bug/C.hs
index 363221d9..d846035b 100644
--- a/examples/hide-bug/C.hs
+++ b/examples/hide-bug/C.hs
@@ -1 +1,6 @@
-module C(module B) where import B
+module C(C.bla) where 
+
+import D
+
+bla :: Test
+bla = undefined
diff --git a/examples/hide-bug/D.hs b/examples/hide-bug/D.hs
index 30ac8acc..a9203a7c 100644
--- a/examples/hide-bug/D.hs
+++ b/examples/hide-bug/D.hs
@@ -1,3 +1,5 @@
 -- The link to the type T in the doc for this module should point to 
 -- B.T, not A.T.  Bug fixed in rev 1.59 of Main.hs.
-module D(f) where import C
+module D(Test) where 
+
+import B