summaryrefslogtreecommitdiff
path: root/compiler/codeGen/CodeGen.lhs
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2012-09-03 23:42:17 +0100
committerIan Lynagh <ian@well-typed.com>2012-09-03 23:42:17 +0100
commit7b11baa68c36fdf5e441c76061fec3a38bc5dbbb (patch)
tree18411e954ca515f2830a60d7db166f121a4592e6 /compiler/codeGen/CodeGen.lhs
parentaf4f98719e48cbb891bfb6e1c04c577649f32760 (diff)
downloadhaskell-7b11baa68c36fdf5e441c76061fec3a38bc5dbbb.tar.gz
Make -fhpc a dynamic flag
Diffstat (limited to 'compiler/codeGen/CodeGen.lhs')
-rw-r--r--compiler/codeGen/CodeGen.lhs3
1 files changed, 1 insertions, 2 deletions
diff --git a/compiler/codeGen/CodeGen.lhs b/compiler/codeGen/CodeGen.lhs
index 29193137a7..311f947248 100644
--- a/compiler/codeGen/CodeGen.lhs
+++ b/compiler/codeGen/CodeGen.lhs
@@ -35,7 +35,6 @@ import OldPprCmm ()
import StgSyn
import PrelNames
import DynFlags
-import StaticFlags
import HscTypes
import CostCentre
@@ -101,7 +100,7 @@ mkModuleInit
mkModuleInit dflags cost_centre_info this_mod hpc_info
= do { -- Allocate the static boolean that records if this
- ; whenC (opt_Hpc) $
+ ; whenC (dopt Opt_Hpc dflags) $
hpcTable this_mod hpc_info
; whenC (dopt Opt_SccProfilingOn dflags) $ do