X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fmain%2FStaticFlags.hs;h=67e8ab58e50c7883c90d045b4ad7fa85158d82b6;hp=546565c966b5dcfd34c1fc5014b35d0153871f12;hb=d2b7119250068ecbf5f085220663687733bde477;hpb=6646a0226e5380a3ff088cfc59fb761d8265994b

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")