diff options
Diffstat (limited to 'compiler/cmm')
| -rw-r--r-- | compiler/cmm/CmmLex.x | 11 | ||||
| -rw-r--r-- | compiler/cmm/CmmParse.y | 8 |
2 files changed, 7 insertions, 12 deletions
diff --git a/compiler/cmm/CmmLex.x b/compiler/cmm/CmmLex.x index 65c85f1ac4..820899b8d4 100644 --- a/compiler/cmm/CmmLex.x +++ b/compiler/cmm/CmmLex.x @@ -11,9 +11,12 @@ ----------------------------------------------------------------------------- { -{-# LANGUAGE BangPatterns #-} -{-# OPTIONS -Wwarn -w #-} --- The above -Wwarn suppression flag is a temporary kludge. +{-# OPTIONS_GHC -fno-warn-unused-do-bind #-} +{-# OPTIONS_GHC -fno-warn-unused-matches #-} +{-# OPTIONS_GHC -fno-warn-unused-binds #-} +{-# OPTIONS_GHC -fno-warn-tabs #-} +{-# OPTIONS_GHC -fno-warn-missing-signatures #-} +-- The above warning suppression flags are a temporary kludge. -- While working on this module you are encouraged to remove it and fix -- any warnings in the module. See -- http://ghc.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings @@ -35,7 +38,7 @@ import Util --import TRACE import Data.Word -import Data.Char +import Data.Char hiding (ord) } $whitechar = [\ \t\n\r\f\v\xa0] -- \xa0 is Unicode no-break space diff --git a/compiler/cmm/CmmParse.y b/compiler/cmm/CmmParse.y index 694d79ead9..9638c142d0 100644 --- a/compiler/cmm/CmmParse.y +++ b/compiler/cmm/CmmParse.y @@ -195,14 +195,6 @@ convention. ----------------------------------------------------------------------------- -} { -{-# LANGUAGE BangPatterns #-} -- required for versions of Happy before 1.18.6 -{-# OPTIONS -Wwarn -w #-} --- The above warning suppression flag is a temporary kludge. --- While working on this module you are encouraged to remove it and fix --- any warnings in the module. See --- http://ghc.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings --- for details - module CmmParse ( parseCmmFile ) where import StgCmmExtCode |