X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Fcompiler%2FcoreSyn%2FCoreLint.lhs;h=5915c2b1190a2f57587dc8aa603abce2351dc62c;hb=b434cbc61b112222ca53141bd4d9bd4ea92ac858;hp=7470294d1c204144efeaee9547cca22f79b32a18;hpb=3fe27db88139e65f2a153c91b323cb43fd52185e;p=ghc-hetmet.git diff --git a/ghc/compiler/coreSyn/CoreLint.lhs b/ghc/compiler/coreSyn/CoreLint.lhs index 7470294..5915c2b 100644 --- a/ghc/compiler/coreSyn/CoreLint.lhs +++ b/ghc/compiler/coreSyn/CoreLint.lhs @@ -37,9 +37,13 @@ import Type ( Type, tyVarsOfType, eqType, import TyCon ( isPrimTyCon ) import BasicTypes ( RecFlag(..), isNonRec ) import CmdLineOpts -import Maybe import Outputable +#ifdef DEBUG +import Util ( notNull ) +#endif + +import Maybe import IO ( hPutStrLn, stderr ) infixr 9 `thenL`, `seqL`