[commit: ghc] master: Fix build with GHC 7.0 (31afdf5)

[Ian Lynagh]

Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/31afdf5ceb93b520ffeaa470562c0cbd8462bcb6

>---------------------------------------------------------------

commit 31afdf5ceb93b520ffeaa470562c0cbd8462bcb6
Author: Ian Lynagh <igloo at earth.li>
Date:   Fri Jul 13 18:14:01 2012 +0100

    Fix build with GHC 7.0

>---------------------------------------------------------------

 compiler/cmm/CmmLayoutStack.hs |    3 +++
 compiler/cmm/CmmLint.hs        |    3 +++
 compiler/cmm/CmmProcPoint.hs   |    3 +++
 compiler/cmm/Hoopl.hs          |    3 +++
 compiler/cmm/Hoopl/Dataflow.hs |    3 +++
 5 files changed, 15 insertions(+), 0 deletions(-)

diff --git a/compiler/cmm/CmmLayoutStack.hs b/compiler/cmm/CmmLayoutStack.hs
index 47239ca..732fb2b 100644
--- a/compiler/cmm/CmmLayoutStack.hs
+++ b/compiler/cmm/CmmLayoutStack.hs
@@ -1,4 +1,7 @@
 {-# LANGUAGE RecordWildCards, GADTs #-}
+#if __GLASGOW_HASKELL__ < 701
+{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-}
+#endif
 module CmmLayoutStack (
        cmmLayoutStack, setInfoTableStackMap, cmmSink
   ) where
diff --git a/compiler/cmm/CmmLint.hs b/compiler/cmm/CmmLint.hs
index 2e24dd7..e4bc308 100644
--- a/compiler/cmm/CmmLint.hs
+++ b/compiler/cmm/CmmLint.hs
@@ -6,6 +6,9 @@
 --
 -----------------------------------------------------------------------------
 {-# LANGUAGE GADTs #-}
+#if __GLASGOW_HASKELL__ < 701
+{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-}
+#endif
 module CmmLint (
     cmmLint, cmmLintGraph
   ) where
diff --git a/compiler/cmm/CmmProcPoint.hs b/compiler/cmm/CmmProcPoint.hs
index ebe40d9..51b2845 100644
--- a/compiler/cmm/CmmProcPoint.hs
+++ b/compiler/cmm/CmmProcPoint.hs
@@ -1,5 +1,8 @@
 {-# LANGUAGE GADTs, DisambiguateRecordFields #-}
 {-# OPTIONS_GHC -fno-warn-warnings-deprecations #-}
+#if __GLASGOW_HASKELL__ < 701
+{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-}
+#endif
 
 module CmmProcPoint
     ( ProcPointSet, Status(..)
diff --git a/compiler/cmm/Hoopl.hs b/compiler/cmm/Hoopl.hs
index 08d95b5..1d69be4 100644
--- a/compiler/cmm/Hoopl.hs
+++ b/compiler/cmm/Hoopl.hs
@@ -1,3 +1,6 @@
+#if __GLASGOW_HASKELL__ < 701
+{-# OPTIONS_GHC -fno-warn-duplicate-exports #-}
+#endif
 module Hoopl (
     module Compiler.Hoopl,
     module Hoopl.Dataflow,
diff --git a/compiler/cmm/Hoopl/Dataflow.hs b/compiler/cmm/Hoopl/Dataflow.hs
index e35beb9..6b9a135 100644
--- a/compiler/cmm/Hoopl/Dataflow.hs
+++ b/compiler/cmm/Hoopl/Dataflow.hs
@@ -16,6 +16,9 @@
 #if __GLASGOW_HASKELL__ >= 701
 {-# LANGUAGE Trustworthy #-}
 #endif
+#if __GLASGOW_HASKELL__ < 701
+{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-}
+#endif
 
 module Hoopl.Dataflow
   ( DataflowLattice(..), OldFact(..), NewFact(..), Fact, mkFactBase