[project @ 2001-08-04 06:19:54 by ken]
[ghc-hetmet.git] / ghc / compiler / stranal / SaLib.lhs
index 813410c..ac9c267 100644 (file)
@@ -18,12 +18,10 @@ module SaLib (
 
 #include "HsVersions.h"
 
-import Id              ( Id )
 import Type            ( Type )
-import CoreSyn         ( CoreExpr )
 import VarEnv
 import IdInfo          ( StrictnessInfo(..) )
-import Demand          ( Demand, pprDemands )
+import Demand          ( Demand )
 import Outputable
 \end{code}
 
@@ -39,7 +37,7 @@ import Outputable
 data AnalysisKind
   = StrAnal    -- We're doing strictness analysis
   | AbsAnal    -- We're doing absence analysis
-  deriving Text
+  deriving Show
 \end{code}
 
 @AbsVal@ is the data type of HNF abstract values.