diff options
| -rw-r--r-- | compiler/cmm/CmmRewriteAssignments.hs | 4 | ||||
| -rw-r--r-- | compiler/cmm/CmmSpillReload.hs | 4 |
2 files changed, 6 insertions, 2 deletions
diff --git a/compiler/cmm/CmmRewriteAssignments.hs b/compiler/cmm/CmmRewriteAssignments.hs index 6a59e34014..d4d0e0cf05 100644 --- a/compiler/cmm/CmmRewriteAssignments.hs +++ b/compiler/cmm/CmmRewriteAssignments.hs @@ -3,6 +3,10 @@ {-# LANGUAGE FlexibleContexts #-} {-# OPTIONS_GHC -fno-warn-warnings-deprecations #-} +#if __GLASGOW_HASKELL__ < 701 +-- GHC 7.0.1 improved incomplete pattern warnings with GADTs +{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-} +#endif -- This module implements generalized code motion for assignments to -- local registers, inlining and sinking when possible. It also does diff --git a/compiler/cmm/CmmSpillReload.hs b/compiler/cmm/CmmSpillReload.hs index a4bedb0baa..1dbfbb051b 100644 --- a/compiler/cmm/CmmSpillReload.hs +++ b/compiler/cmm/CmmSpillReload.hs @@ -3,9 +3,9 @@ -- If this module lives on I'd like to get rid of this flag in due course {-# OPTIONS_GHC -fno-warn-warnings-deprecations #-} -#if __GLASGOW_HASKELL__ >= 701 +#if __GLASGOW_HASKELL__ < 701 -- GHC 7.0.1 improved incomplete pattern warnings with GADTs -{-# OPTIONS_GHC -fwarn-incomplete-patterns #-} +{-# OPTIONS_GHC -fno-warn-incomplete-patterns #-} #endif module CmmSpillReload |