diff options
author | Ian Lynagh <igloo@earth.li> | 2007-09-12 16:22:00 +0000 |
---|---|---|
committer | Ian Lynagh <igloo@earth.li> | 2007-09-12 16:22:00 +0000 |
commit | 1241c26f3552a2037263769e5ef7fa68d9f3be36 (patch) | |
tree | f8b629f786d37dbb21351c0e7a19971c86a6f656 | |
parent | b494094bdec3f756010583342ce7bd1fed805281 (diff) | |
download | haskell-1241c26f3552a2037263769e5ef7fa68d9f3be36.tar.gz |
Remove warning flags from individual compiler modules
We now set the flags once and for all in compiler/Makefile.
-rw-r--r-- | compiler/cmm/CmmCPSZ.hs | 1 | ||||
-rw-r--r-- | compiler/cmm/CmmContFlowOpt.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/CmmCvt.hs | 1 | ||||
-rw-r--r-- | compiler/cmm/CmmExpr.hs | 1 | ||||
-rw-r--r-- | compiler/cmm/CmmLiveZ.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/CmmProcPointZ.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/CmmSpillReload.hs | 1 | ||||
-rw-r--r-- | compiler/cmm/CmmTx.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/CmmZipUtil.hs | 6 | ||||
-rw-r--r-- | compiler/cmm/DFMonad.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/MkZipCfg.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/StackColor.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/StackPlacements.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/ZipCfg.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/ZipCfgCmmRep.hs | 2 | ||||
-rw-r--r-- | compiler/cmm/ZipDataflow.hs | 2 |
16 files changed, 14 insertions, 18 deletions
diff --git a/compiler/cmm/CmmCPSZ.hs b/compiler/cmm/CmmCPSZ.hs index 9410304b68..d0858e977a 100644 --- a/compiler/cmm/CmmCPSZ.hs +++ b/compiler/cmm/CmmCPSZ.hs @@ -1,4 +1,3 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} module CmmCPSZ ( -- | Converts C-- with full proceedures and parameters diff --git a/compiler/cmm/CmmContFlowOpt.hs b/compiler/cmm/CmmContFlowOpt.hs index 4e319c82b2..022b2ddaa5 100644 --- a/compiler/cmm/CmmContFlowOpt.hs +++ b/compiler/cmm/CmmContFlowOpt.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + module CmmContFlowOpt ( runCmmOpts, cmmCfgOpts, cmmCfgOptsZ , branchChainElimZ, removeUnreachableBlocksZ diff --git a/compiler/cmm/CmmCvt.hs b/compiler/cmm/CmmCvt.hs index ca635c2312..ae336b56a3 100644 --- a/compiler/cmm/CmmCvt.hs +++ b/compiler/cmm/CmmCvt.hs @@ -1,5 +1,4 @@ {-# LANGUAGE PatternGuards #-} -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} module CmmCvt ( cmmToZgraph, cmmOfZgraph ) diff --git a/compiler/cmm/CmmExpr.hs b/compiler/cmm/CmmExpr.hs index 791731b1aa..983a232e17 100644 --- a/compiler/cmm/CmmExpr.hs +++ b/compiler/cmm/CmmExpr.hs @@ -1,4 +1,3 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} module CmmExpr ( CmmExpr(..), cmmExprRep, maybeInvertCmmExpr diff --git a/compiler/cmm/CmmLiveZ.hs b/compiler/cmm/CmmLiveZ.hs index 00a649188f..8a5d36c658 100644 --- a/compiler/cmm/CmmLiveZ.hs +++ b/compiler/cmm/CmmLiveZ.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + module CmmLiveZ ( CmmLive , cmmLivenessZ diff --git a/compiler/cmm/CmmProcPointZ.hs b/compiler/cmm/CmmProcPointZ.hs index c73f0164ec..e250bf32e3 100644 --- a/compiler/cmm/CmmProcPointZ.hs +++ b/compiler/cmm/CmmProcPointZ.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + module CmmProcPointZ ( minimalProcPointSet , addProcPointProtocols diff --git a/compiler/cmm/CmmSpillReload.hs b/compiler/cmm/CmmSpillReload.hs index 6195a4ca11..7d4f42c7a6 100644 --- a/compiler/cmm/CmmSpillReload.hs +++ b/compiler/cmm/CmmSpillReload.hs @@ -1,4 +1,3 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} module CmmSpillReload ( ExtendWithSpills(..) diff --git a/compiler/cmm/CmmTx.hs b/compiler/cmm/CmmTx.hs index ef3e8e733b..d9733b8593 100644 --- a/compiler/cmm/CmmTx.hs +++ b/compiler/cmm/CmmTx.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + module CmmTx where data ChangeFlag = NoChange | SomeChange diff --git a/compiler/cmm/CmmZipUtil.hs b/compiler/cmm/CmmZipUtil.hs index 2dcb55fe2e..c7a027e93f 100644 --- a/compiler/cmm/CmmZipUtil.hs +++ b/compiler/cmm/CmmZipUtil.hs @@ -1,10 +1,10 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} -module CmmZipUtil + +module CmmZipUtil ( zipPreds ) where import Prelude hiding (last, unzip) -import ZipCfg +import ZipCfg import Maybes -- | Compute the predecessors of each *reachable* block diff --git a/compiler/cmm/DFMonad.hs b/compiler/cmm/DFMonad.hs index fc2fd45cd2..0365cbb9b0 100644 --- a/compiler/cmm/DFMonad.hs +++ b/compiler/cmm/DFMonad.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + module DFMonad ( OptimizationFuel , DFTx, runDFTx, lastTxPass, txDecrement, txRemaining, txExhausted diff --git a/compiler/cmm/MkZipCfg.hs b/compiler/cmm/MkZipCfg.hs index 8b0284c411..9b9989c465 100644 --- a/compiler/cmm/MkZipCfg.hs +++ b/compiler/cmm/MkZipCfg.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} +{-# LANGUAGE ScopedTypeVariables #-} module MkZipCfg ( AGraph, (<*>), emptyAGraph, withFreshLabel, withUnique , mkMiddle, mkMiddles, mkLast, mkZTail, mkBranch, mkLabel, mkIfThenElse, mkWhileDo diff --git a/compiler/cmm/StackColor.hs b/compiler/cmm/StackColor.hs index c9cb856651..2f97a18877 100644 --- a/compiler/cmm/StackColor.hs +++ b/compiler/cmm/StackColor.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + module StackColor where import StackPlacements diff --git a/compiler/cmm/StackPlacements.hs b/compiler/cmm/StackPlacements.hs index 31a5198b0c..5cac288573 100644 --- a/compiler/cmm/StackPlacements.hs +++ b/compiler/cmm/StackPlacements.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + module StackPlacements ( SlotSet, allStackSlots -- the infinite set of stack slots , SlotClass(..), slotClassBits, stackSlot32, stackSlot64, stackSlot128 diff --git a/compiler/cmm/ZipCfg.hs b/compiler/cmm/ZipCfg.hs index b8088d0373..672c55caab 100644 --- a/compiler/cmm/ZipCfg.hs +++ b/compiler/cmm/ZipCfg.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} +{-# LANGUAGE ScopedTypeVariables #-} module ZipCfg ( BlockId(..), freshBlockId , BlockEnv, emptyBlockEnv, lookupBlockEnv, extendBlockEnv, insertBlock, mkBlockEnv diff --git a/compiler/cmm/ZipCfgCmmRep.hs b/compiler/cmm/ZipCfgCmmRep.hs index da84f7b098..135a219e8d 100644 --- a/compiler/cmm/ZipCfgCmmRep.hs +++ b/compiler/cmm/ZipCfgCmmRep.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + -- This module is pure representation and should be imported only by -- clients that need to manipulate representation and know what diff --git a/compiler/cmm/ZipDataflow.hs b/compiler/cmm/ZipDataflow.hs index df05680e4f..36285a3861 100644 --- a/compiler/cmm/ZipDataflow.hs +++ b/compiler/cmm/ZipDataflow.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -Wall -fno-warn-name-shadowing #-} + {-# LANGUAGE MultiParamTypeClasses #-} module ZipDataflow ( Answer(..) |