[project @ 1997-05-19 00:12:10 by sof]
[ghc-hetmet.git] / ghc / compiler / codeGen / CgCon.lhs
index 2ae485e..a411043 100644 (file)
@@ -41,11 +41,11 @@ import ClosureInfo  ( mkClosureLFInfo, mkConLFInfo, mkLFArgument,
                          layOutStaticClosure
                        )
 import CostCentre      ( currentOrSubsumedCosts, useCurrentCostCentre,
-                         dontCareCostCentre
+                         dontCareCostCentre, CostCentre
                        )
 import Id              ( idPrimRep, dataConTag, dataConTyCon,
                          isDataCon, SYN_IE(DataCon),
-                         emptyIdSet
+                         emptyIdSet, SYN_IE(Id)
                        )
 import Literal         ( Literal(..) )
 import Maybes          ( maybeToBool )