summaryrefslogtreecommitdiff
path: root/compiler/codeGen/StgCmmTicky.hs
diff options
context:
space:
mode:
authorIan Lynagh <ian@well-typed.com>2012-09-03 17:25:47 +0100
committerIan Lynagh <ian@well-typed.com>2012-09-03 17:25:47 +0100
commitda3362247b72531e1355748d1fdbc2c954a3f300 (patch)
tree137c904594794fcb68587a1a4c0b697a7572455c /compiler/codeGen/StgCmmTicky.hs
parent4f15146c1772ffe1b9d59df3239081f72f423801 (diff)
downloadhaskell-da3362247b72531e1355748d1fdbc2c954a3f300.tar.gz
Remove doingTickyProfiling
It's now just 'dopt Opt_Ticky'
Diffstat (limited to 'compiler/codeGen/StgCmmTicky.hs')
-rw-r--r--compiler/codeGen/StgCmmTicky.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/codeGen/StgCmmTicky.hs b/compiler/codeGen/StgCmmTicky.hs
index 585d6b08eb..bb1c4cf788 100644
--- a/compiler/codeGen/StgCmmTicky.hs
+++ b/compiler/codeGen/StgCmmTicky.hs
@@ -332,8 +332,8 @@ tickyAllocHeap hp
ifTicky :: FCode () -> FCode ()
ifTicky code = do dflags <- getDynFlags
- if doingTickyProfiling dflags then code
- else nopC
+ if dopt Opt_Ticky dflags then code
+ else nopC
-- All the ticky-ticky counters are declared "unsigned long" in C
bumpTickyCounter :: FastString -> FCode ()