From: Simon Peyton Jones <simonpj@microsoft.com>
Date: Sat, 11 Jun 2011 13:12:43 +0000 (+0100)
Subject: Add -fno-omit-interface-pragmas to SrcLoc, to work around Trac #5252
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=8fb9d66966e99beea793b695edef596ac8d5aea5

Add -fno-omit-interface-pragmas to SrcLoc, to work around Trac #5252

We have to do this until the earliest bootstrap compiler
has fixed #5252.  It's no big deal; it just means that
SrcLoc.hi has lots of stuff even when compiling GHC without -O.
Lacking this, you get

  (GHC version 7.0.3 for i386-unknown-mingw32):
	reboxProduct: not a product ghc-7.1:SrcLoc.RealSrcLoc{tc r8J}
---

diff --git a/compiler/basicTypes/SrcLoc.lhs b/compiler/basicTypes/SrcLoc.lhs
index 22ab915..f15d0da 100644
--- a/compiler/basicTypes/SrcLoc.lhs
+++ b/compiler/basicTypes/SrcLoc.lhs
@@ -3,6 +3,12 @@
 %
 
 \begin{code}
+{-# OPTIONS_GHC -fno-omit-interface-pragmas #-}
+   -- Workaround for Trac #5252 crashes the bootstrap compiler without -O
+   -- When the earliest compiler we want to boostrap with is
+   -- GHC 7.2, we can make RealSrcLoc properly abstract
+
+
 -- | This module contains types that relate to the positions of things
 -- in source files, and allow tagging of those things with locations
 module SrcLoc (