We now set the flags once and for all in compiler/Makefile.
16 files changed:
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmCPSZ (
-- | Converts C-- with full proceedures and parameters
module CmmCPSZ (
-- | Converts C-- with full proceedures and parameters
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmContFlowOpt
( runCmmOpts, cmmCfgOpts, cmmCfgOptsZ
, branchChainElimZ, removeUnreachableBlocksZ
module CmmContFlowOpt
( runCmmOpts, cmmCfgOpts, cmmCfgOptsZ
, branchChainElimZ, removeUnreachableBlocksZ
{-# LANGUAGE PatternGuards #-}
{-# LANGUAGE PatternGuards #-}
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmCvt
( cmmToZgraph, cmmOfZgraph )
module CmmCvt
( cmmToZgraph, cmmOfZgraph )
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmExpr
( CmmExpr(..), cmmExprRep, maybeInvertCmmExpr
module CmmExpr
( CmmExpr(..), cmmExprRep, maybeInvertCmmExpr
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmLiveZ
( CmmLive
, cmmLivenessZ
module CmmLiveZ
( CmmLive
, cmmLivenessZ
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmProcPointZ
( minimalProcPointSet
, addProcPointProtocols
module CmmProcPointZ
( minimalProcPointSet
, addProcPointProtocols
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmSpillReload
( ExtendWithSpills(..)
module CmmSpillReload
( ExtendWithSpills(..)
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module CmmTx where
data ChangeFlag = NoChange | SomeChange
module CmmTx where
data ChangeFlag = NoChange | SomeChange
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
-module CmmZipUtil
( zipPreds
)
where
import Prelude hiding (last, unzip)
( zipPreds
)
where
import Prelude hiding (last, unzip)
import Maybes
-- | Compute the predecessors of each *reachable* block
import Maybes
-- | Compute the predecessors of each *reachable* block
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module DFMonad
( OptimizationFuel
, DFTx, runDFTx, lastTxPass, txDecrement, txRemaining, txExhausted
module DFMonad
( OptimizationFuel
, DFTx, runDFTx, lastTxPass, txDecrement, txRemaining, txExhausted
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
+{-# LANGUAGE ScopedTypeVariables #-}
module MkZipCfg
( AGraph, (<*>), emptyAGraph, withFreshLabel, withUnique
, mkMiddle, mkMiddles, mkLast, mkZTail, mkBranch, mkLabel, mkIfThenElse, mkWhileDo
module MkZipCfg
( AGraph, (<*>), emptyAGraph, withFreshLabel, withUnique
, mkMiddle, mkMiddles, mkLast, mkZTail, mkBranch, mkLabel, mkIfThenElse, mkWhileDo
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module StackColor where
import StackPlacements
module StackColor where
import StackPlacements
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
module StackPlacements
( SlotSet, allStackSlots -- the infinite set of stack slots
, SlotClass(..), slotClassBits, stackSlot32, stackSlot64, stackSlot128
module StackPlacements
( SlotSet, allStackSlots -- the infinite set of stack slots
, SlotClass(..), slotClassBits, stackSlot32, stackSlot64, stackSlot128
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
+{-# LANGUAGE ScopedTypeVariables #-}
module ZipCfg
( BlockId(..), freshBlockId
, BlockEnv, emptyBlockEnv, lookupBlockEnv, extendBlockEnv, insertBlock, mkBlockEnv
module ZipCfg
( BlockId(..), freshBlockId
, BlockEnv, emptyBlockEnv, lookupBlockEnv, extendBlockEnv, insertBlock, mkBlockEnv
-{-# 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
-- This module is pure representation and should be imported only by
-- clients that need to manipulate representation and know what
-{-# OPTIONS -Wall -fno-warn-name-shadowing #-}
{-# LANGUAGE MultiParamTypeClasses #-}
module ZipDataflow
( Answer(..)
{-# LANGUAGE MultiParamTypeClasses #-}
module ZipDataflow
( Answer(..)