diff options
Diffstat (limited to 'compiler/GHC/CmmToAsm')
-rw-r--r-- | compiler/GHC/CmmToAsm/BlockLayout.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/CmmToAsm/Reg/Graph/Spill.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/CmmToAsm/Reg/Graph/SpillClean.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/CmmToAsm/Reg/Linear.hs | 2 | ||||
-rw-r--r-- | compiler/GHC/CmmToAsm/Reg/Liveness.hs | 2 |
5 files changed, 5 insertions, 5 deletions
diff --git a/compiler/GHC/CmmToAsm/BlockLayout.hs b/compiler/GHC/CmmToAsm/BlockLayout.hs index d32357b5cc..b7c6ffb098 100644 --- a/compiler/GHC/CmmToAsm/BlockLayout.hs +++ b/compiler/GHC/CmmToAsm/BlockLayout.hs @@ -44,7 +44,7 @@ import GHC.Data.Maybe import GHC.Data.List.SetOps (removeDups) import GHC.Data.OrdList -import Data.List +import Data.List (sortOn, sortBy) import Data.Foldable (toList) import qualified Data.Set as Set diff --git a/compiler/GHC/CmmToAsm/Reg/Graph/Spill.hs b/compiler/GHC/CmmToAsm/Reg/Graph/Spill.hs index e290be505e..86c3590f99 100644 --- a/compiler/GHC/CmmToAsm/Reg/Graph/Spill.hs +++ b/compiler/GHC/CmmToAsm/Reg/Graph/Spill.hs @@ -27,7 +27,7 @@ import GHC.Utils.Outputable import GHC.Utils.Panic import GHC.Platform -import Data.List +import Data.List (nub, (\\), intersect) import Data.Maybe import Data.IntSet (IntSet) import qualified Data.IntSet as IntSet diff --git a/compiler/GHC/CmmToAsm/Reg/Graph/SpillClean.hs b/compiler/GHC/CmmToAsm/Reg/Graph/SpillClean.hs index 42421bfb08..a93b56de95 100644 --- a/compiler/GHC/CmmToAsm/Reg/Graph/SpillClean.hs +++ b/compiler/GHC/CmmToAsm/Reg/Graph/SpillClean.hs @@ -51,7 +51,7 @@ import GHC.Utils.Panic import GHC.Platform import GHC.Cmm.Dataflow.Collections -import Data.List +import Data.List (nub, foldl1', find) import Data.Maybe import Data.IntSet (IntSet) import qualified Data.IntSet as IntSet diff --git a/compiler/GHC/CmmToAsm/Reg/Linear.hs b/compiler/GHC/CmmToAsm/Reg/Linear.hs index 849f600465..4b44c14b6c 100644 --- a/compiler/GHC/CmmToAsm/Reg/Linear.hs +++ b/compiler/GHC/CmmToAsm/Reg/Linear.hs @@ -139,7 +139,7 @@ import GHC.Utils.Panic import GHC.Platform import Data.Maybe -import Data.List +import Data.List (partition, nub) import Control.Monad import Control.Applicative diff --git a/compiler/GHC/CmmToAsm/Reg/Liveness.hs b/compiler/GHC/CmmToAsm/Reg/Liveness.hs index c19a8085a8..bf53ecf421 100644 --- a/compiler/GHC/CmmToAsm/Reg/Liveness.hs +++ b/compiler/GHC/CmmToAsm/Reg/Liveness.hs @@ -67,7 +67,7 @@ import GHC.Types.Unique.Supply import GHC.Data.Bag import GHC.Utils.Monad.State -import Data.List +import Data.List (mapAccumL, groupBy, partition) import Data.Maybe import Data.IntSet (IntSet) |