diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-06-05 00:52:01 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-06-05 03:11:23 +0100 |
| commit | 243439e6e77eca548a6583722792d6b96e3f6bcd (patch) | |
| tree | 82a7852a205a53f3acfcd5d345a43cb7e284108f /compiler/iface | |
| parent | 50fddb2b046605315f903d9b744780497cc978de (diff) | |
| download | haskell-243439e6e77eca548a6583722792d6b96e3f6bcd.tar.gz | |
Change how macros like ASSERT are defined
By using Haskell's debugIsOn rather than CPP's "#ifdef DEBUG", we
don't need to kludge things to keep the warning checker happy etc.
Diffstat (limited to 'compiler/iface')
| -rw-r--r-- | compiler/iface/BinIface.hs | 1 | ||||
| -rw-r--r-- | compiler/iface/BuildTyCl.lhs | 2 | ||||
| -rw-r--r-- | compiler/iface/IfaceEnv.lhs | 1 |
3 files changed, 3 insertions, 1 deletions
diff --git a/compiler/iface/BinIface.hs b/compiler/iface/BinIface.hs index 305fa54d0e..a69656533c 100644 --- a/compiler/iface/BinIface.hs +++ b/compiler/iface/BinIface.hs @@ -51,6 +51,7 @@ import Outputable import Platform import FastString import Constants +import Util import Data.Bits import Data.Char diff --git a/compiler/iface/BuildTyCl.lhs b/compiler/iface/BuildTyCl.lhs index d41ee68d20..9456bdaf34 100644 --- a/compiler/iface/BuildTyCl.lhs +++ b/compiler/iface/BuildTyCl.lhs @@ -38,7 +38,7 @@ import Type import Coercion import TcRnMonad -import Util ( isSingleton ) +import Util import Outputable \end{code} diff --git a/compiler/iface/IfaceEnv.lhs b/compiler/iface/IfaceEnv.lhs index 4c66a98314..1e776f52a3 100644 --- a/compiler/iface/IfaceEnv.lhs +++ b/compiler/iface/IfaceEnv.lhs @@ -41,6 +41,7 @@ import FastString import UniqSupply import SrcLoc import BasicTypes +import Util import Outputable import Exception ( evaluate ) |