[project @ 1997-09-09 17:56:30 by sof]
[ghc-hetmet.git] / ghc / compiler / simplStg / StgStats.lhs
index d1dd34c..7be7b10 100644 (file)
@@ -29,7 +29,8 @@ IMP_Ubiq(){-uitous-}
 
 import StgSyn
 
-import FiniteMap       ( emptyFM, plusFM_C, unitFM, fmToList )
+import FiniteMap       ( emptyFM, plusFM_C, unitFM, fmToList, FiniteMap )
+import Id (SYN_IE(Id))
 \end{code}
 
 \begin{code}