[project @ 2000-10-24 10:12:16 by sewardj]

[ghc-hetmet.git] / ghc / compiler / stgSyn / StgInterp.lhs

diff --git a/ghc/compiler/stgSyn/StgInterp.lhs b/ghc/compiler/stgSyn/StgInterp.lhs
index 1ccbb44..7c0eb6e 100644 (file)
--- a/ghc/compiler/stgSyn/StgInterp.lhs
+++ b/ghc/compiler/stgSyn/StgInterp.lhs
@@ -65,14 +65,16 @@ import GlaExts              ( Int(..) )
 import Module          ( moduleNameFS )
 #endif
 
-import TyCon           ( TyCon )
+import TyCon           ( TyCon, isDataTyCon, tyConDataCons, tyConFamilySize )
 import Class           ( Class )
 import InterpSyn
 import StgSyn
 import Addr
-import RdrName         ( RdrName )
+import RdrName         ( RdrName, rdrNameModule, rdrNameOcc )
 import FiniteMap
 import Panic           ( panic )
+import OccName         ( occNameString )
+
 
 -- ---------------------------------------------------------------------------
 -- Environments needed by the linker