From 82a5bcbb729d769a53e9c14b0be9c9b6b8daa548 Mon Sep 17 00:00:00 2001
From: davve <davve@dtek.chalmers.se>
Date: Sat, 29 Jul 2006 16:16:43 +0000
Subject: Add instances, build renaming environment, start on the renamer

---
 examples/hide-bug/B.hs | 4 +++-
 examples/hide-bug/C.hs | 7 ++++++-
 examples/hide-bug/D.hs | 4 +++-
 3 files changed, 12 insertions(+), 3 deletions(-)

(limited to 'examples/hide-bug')

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
-- 
cgit v1.2.3