From d85714eb5c826058f0535da615c41ed4e9613317 Mon Sep 17 00:00:00 2001
From: "andy@galois.com" <unknown>
Date: Wed, 20 Jun 2007 15:02:44 +0000
Subject: [PATCH] turning back on case liberation when using hpc

---
 compiler/main/DynFlags.hs |    3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/compiler/main/DynFlags.hs b/compiler/main/DynFlags.hs
index b3ee6fb..c8615da 100644
--- a/compiler/main/DynFlags.hs
+++ b/compiler/main/DynFlags.hs
@@ -59,7 +59,7 @@ import PrelNames	( mAIN )
 import StaticFlags	( opt_Static )
 #endif
 import StaticFlags	( opt_PIC, WayName(..), v_Ways, v_Build_tag,
-			  v_RTS_Build_tag, opt_Hpc )
+			  v_RTS_Build_tag )
 import {-# SOURCE #-} Packages (PackageState)
 import DriverPhases	( Phase(..), phaseInputExt )
 import Config
@@ -677,7 +677,6 @@ getCoreToDo dflags
     cse           = dopt Opt_CSE dflags
     spec_constr   = dopt Opt_SpecConstr dflags
     liberate_case = dopt Opt_LiberateCase dflags
-		  && not opt_Hpc 
     rule_check    = ruleCheck dflags
 
     core_todo = 
-- 
1.7.10.4