diff options
| author | Matthew Pickering <matthewtpickering@gmail.com> | 2022-02-21 17:19:07 +0000 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2022-02-24 20:25:06 -0500 |
| commit | d0deaaf4241fa236bd8d87abde68a0ad41a7e119 (patch) | |
| tree | 34dfe80938a15ca0d6efb19f674ebdda54eecee5 /compiler/GHC/Tc/Errors.hs | |
| parent | b99646ed23ba75506005025e625edbc9a5cad41b (diff) | |
| download | haskell-d0deaaf4241fa236bd8d87abde68a0ad41a7e119.tar.gz | |
Suggestions due to hlint
It turns out this job hasn't been running for quite a while (perhaps
ever) so there are quite a few failures when running the linter locally.
Diffstat (limited to 'compiler/GHC/Tc/Errors.hs')
| -rw-r--r-- | compiler/GHC/Tc/Errors.hs | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/compiler/GHC/Tc/Errors.hs b/compiler/GHC/Tc/Errors.hs index b71a6b1dd4..596271b065 100644 --- a/compiler/GHC/Tc/Errors.hs +++ b/compiler/GHC/Tc/Errors.hs @@ -1,13 +1,11 @@ {-# LANGUAGE LambdaCase #-} {-# LANGUAGE NamedFieldPuns #-} -{-# LANGUAGE RecordWildCards #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE TupleSections #-} {-# OPTIONS_GHC -Wno-incomplete-uni-patterns #-} {-# OPTIONS_GHC -Wno-incomplete-record-updates #-} -{-# LANGUAGE TupleSections #-} {-# LANGUAGE ParallelListComp #-} module GHC.Tc.Errors( @@ -86,10 +84,9 @@ import Control.Monad ( unless, when, foldM, forM_ ) import Data.Foldable ( toList ) import Data.Functor ( (<&>) ) import Data.Function ( on ) -import Data.List ( partition, sort ) +import Data.List ( partition, sort, sortBy ) import Data.List.NonEmpty ( NonEmpty(..), (<|) ) import qualified Data.List.NonEmpty as NE ( map, reverse ) -import Data.List ( sortBy ) import Data.Ord ( comparing ) import qualified Data.Semigroup as S |