From d2b7119250068ecbf5f085220663687733bde477 Mon Sep 17 00:00:00 2001
From: "andy@galois.com" <unknown>
Date: Fri, 22 Jun 2007 22:52:26 +0000
Subject: [PATCH] turning off -fhpc in stage1 built ghc

---
 compiler/main/StaticFlags.hs |    6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/compiler/main/StaticFlags.hs b/compiler/main/StaticFlags.hs
index 546565c..67e8ab5 100644
--- a/compiler/main/StaticFlags.hs
+++ b/compiler/main/StaticFlags.hs
@@ -284,8 +284,12 @@ opt_AutoSccsOnIndividualCafs	= lookUp  FSLIT("-fauto-sccs-on-individual-cafs")
 opt_SccProfilingOn		= lookUp  FSLIT("-fscc-profiling")
 opt_DoTickyProfiling            = WayTicky `elem` (unsafePerformIO $ readIORef v_Ways)
 
--- Hpc opts
+-- Hpc opts, only work in a stage2 build
+#if GHCI
 opt_Hpc				= lookUp FSLIT("-fhpc")  
+#else
+opt_Hpc				= False
+#endif
 
 -- language opts
 opt_DictsStrict			= lookUp  FSLIT("-fdicts-strict")
-- 
1.7.10.4