fix maybeSaveCostCentre: cases were reversed

scpmw · Aug 7, 2012 · 3cf6050 · 3cf6050
1 parent 5c3f13f
commit 3cf6050
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/compiler/codeGen/StgCmmExpr.hs b/compiler/codeGen/StgCmmExpr.hs
@@ -432,8 +432,8 @@ cgCase scrut bndr alt_type alts
 -----------------
 maybeSaveCostCentre :: Bool -> FCode (Maybe LocalReg)
 maybeSaveCostCentre simple_scrut
-  | simple_scrut = saveCurrentCostCentre
-  | otherwise    = return Nothing
+  | simple_scrut = return Nothing
+  | otherwise    = saveCurrentCostCentre
 
 
 -----------------