See also: the ``library'' for the ``back end'' (@SaBackLib@).
\begin{code}
+#ifndef OLD_STRICTNESS
+module SaLib () where
+#else
+
module SaLib (
AbsVal(..),
AnalysisKind(..),
#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}
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.
StrAnal -> AbsBot
AbsAnal -> AbsTop
\end{code}
+
+\begin{code}
+#endif /* OLD_STRICTNESS */
+\end{code}