projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
[project @ 2004-10-01 16:39:26 by simonpj]
[ghc-hetmet.git]
/
ghc
/
compiler
/
stranal
/
SaLib.lhs
diff --git
a/ghc/compiler/stranal/SaLib.lhs
b/ghc/compiler/stranal/SaLib.lhs
index
8c443b5
..
72b3ebb
100644
(file)
--- a/
ghc/compiler/stranal/SaLib.lhs
+++ b/
ghc/compiler/stranal/SaLib.lhs
@@
-6,11
+6,10
@@
See also: the ``library'' for the ``back end'' (@SaBackLib@).
\begin{code}
See also: the ``library'' for the ``back end'' (@SaBackLib@).
\begin{code}
-#ifndef DEBUG
--- If DEBUG is off, omit all exports
-module SaAbsInt () where
-
+#ifndef OLD_STRICTNESS
+module SaLib () where
#else
#else
+
module SaLib (
AbsVal(..),
AnalysisKind(..),
module SaLib (
AbsVal(..),
AnalysisKind(..),
@@
-20,7
+19,6
@@
module SaLib (
lookupAbsValEnv,
absValFromStrictness
) where
lookupAbsValEnv,
absValFromStrictness
) where
-#endif /* DEBUG */
#include "HsVersions.h"
#include "HsVersions.h"
@@
-126,3
+124,7
@@
absValFromStrictness anal (StrictnessInfo args_info bot_result)
StrAnal -> AbsBot
AbsAnal -> AbsTop
\end{code}
StrAnal -> AbsBot
AbsAnal -> AbsTop
\end{code}
+
+\begin{code}
+#endif /* OLD_STRICTNESS */
+\end{code}