summaryrefslogtreecommitdiff
path: root/compiler/codeGen
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2014-06-08 11:17:57 +0100
committerSimon Marlow <marlowsd@gmail.com>2014-06-08 11:21:12 +0100
commitc0258176ad255ac42a68df75ac4287630a6c82c0 (patch)
tree7e36d3c9e78ce691dd7fa8d42cb5b871b00916a0 /compiler/codeGen
parent70f58ebfefd47b724a3b0aa3aca50442f937e6eb (diff)
downloadhaskell-c0258176ad255ac42a68df75ac4287630a6c82c0.tar.gz
Don't use showPass in the backend (#8973)
Diffstat (limited to 'compiler/codeGen')
-rw-r--r--compiler/codeGen/StgCmm.hs5
1 files changed, 1 insertions, 4 deletions
diff --git a/compiler/codeGen/StgCmm.hs b/compiler/codeGen/StgCmm.hs
index 740ab5f3d9..efc89fe04a 100644
--- a/compiler/codeGen/StgCmm.hs
+++ b/compiler/codeGen/StgCmm.hs
@@ -39,7 +39,6 @@ import DataCon
import Name
import TyCon
import Module
-import ErrUtils
import Outputable
import Stream
import BasicTypes
@@ -62,9 +61,7 @@ codeGen :: DynFlags
codeGen dflags this_mod data_tycons
cost_centre_info stg_binds hpc_info
- = do { liftIO $ showPass dflags "New CodeGen"
-
- -- cg: run the code generator, and yield the resulting CmmGroup
+ = do { -- cg: run the code generator, and yield the resulting CmmGroup
-- Using an IORef to store the state is a bit crude, but otherwise
-- we would need to add a state monad layer.
; cgref <- liftIO $ newIORef =<< initC