From: simonmar Date: Tue, 4 Dec 2001 11:54:02 +0000 (+0000) Subject: [project @ 2001-12-04 11:54:02 by simonmar] X-Git-Tag: Approximately_9120_patches~471 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=1f742a0f44a20b574b4f3c47f6d321bf3653b269;p=ghc-hetmet.git [project @ 2001-12-04 11:54:02 by simonmar] Omit the whole file, not just the exports, if DEBUG is off. --- diff --git a/ghc/compiler/stranal/SaAbsInt.lhs b/ghc/compiler/stranal/SaAbsInt.lhs index f534371..eabc35e 100644 --- a/ghc/compiler/stranal/SaAbsInt.lhs +++ b/ghc/compiler/stranal/SaAbsInt.lhs @@ -17,13 +17,15 @@ module SaAbsInt ( fixpoint, isBot ) where -#endif /* DEBUG */ + #include "HsVersions.h" import CmdLineOpts ( opt_AllStrict, opt_NumbersStrict ) import CoreSyn import CoreUnfold ( maybeUnfoldingTemplate ) -import Id ( Id, idType, idStrictness, idUnfolding, isDataConId_maybe ) +import Id ( Id, idType, idUnfolding, isDataConId_maybe, + idStrictness, + ) import DataCon ( dataConTyCon, splitProductType_maybe, dataConRepArgTys ) import IdInfo ( StrictnessInfo(..) ) import Demand ( Demand(..), wwPrim, wwStrict, wwUnpack, wwLazy, @@ -917,3 +919,7 @@ used. But who cares about missing that? NB: despite only having a two-point domain, we may still have many iterations, because there are several variables involved at once. + +\begin{code} +#endif /* DEBUG */ +\end{code}