Two things to do with -dsuppress-uniques

[ghc-hetmet.git] / compiler / basicTypes / Id.lhs

diff --git a/compiler/basicTypes/Id.lhs b/compiler/basicTypes/Id.lhs
index ceba599..fbf6b4a 100644 (file)
--- a/compiler/basicTypes/Id.lhs
+++ b/compiler/basicTypes/Id.lhs
@@ -101,7 +101,6 @@ import qualified Var
 
 import TyCon
 import Type
-import TcType
 import TysPrim
 import DataCon
 import Demand
@@ -122,10 +121,12 @@ import StaticFlags
 -- infixl so you can say (id `set` a `set` b)
 infixl         1 `setIdUnfolding`,
          `setIdArity`,
+         `setIdOccInfo`,
          `setIdDemandInfo`,
          `setIdStrictness`,
          `setIdSpecialisation`,
          `setInlinePragma`,
+         `setInlineActivation`,
          `idCafInfo`
 \end{code}