[project @ 1997-05-19 00:12:10 by sof]

[ghc-hetmet.git] / ghc / compiler / profiling / SCCfinal.lhs

diff --git a/ghc/compiler/profiling/SCCfinal.lhs b/ghc/compiler/profiling/SCCfinal.lhs
index 24e0fb3..2e987d6 100644 (file)
--- a/ghc/compiler/profiling/SCCfinal.lhs
+++ b/ghc/compiler/profiling/SCCfinal.lhs
@@ -35,12 +35,13 @@ import CmdLineOpts  ( opt_AutoSccsOnIndividualCafs,
                          opt_CompilingGhcInternals
                        )
 import CostCentre      -- lots of things
-import Id              ( idType, mkSysLocal, emptyIdSet )
+import Id              ( idType, mkSysLocal, emptyIdSet, SYN_IE(Id) )
 import Maybes          ( maybeToBool )
 import PprStyle                -- ToDo: rm
 import SrcLoc          ( noSrcLoc )
 import Type            ( splitSigmaTy, getFunTy_maybe )
-import UniqSupply      ( getUnique, splitUniqSupply )
+import UniqSupply      ( getUnique, splitUniqSupply, UniqSupply )
+import Unique           ( Unique )
 import Util            ( removeDups, assertPanic )
 
 infixr 9 `thenMM`, `thenMM_`