Data.Semigroup redundant

vmchale · May 29, 2024 · 5db43b2 · 5db43b2
1 parent d7a05a5
commit 5db43b2
Show file tree

Hide file tree

Showing 11 changed files with 0 additions and 11 deletions.
diff --git a/run/Main.hs b/run/Main.hs
@@ -1,7 +1,6 @@
 module Main (main) where
 
 import           Data.Foldable            (traverse_)
-import           Data.Semigroup
 import qualified Data.Text.IO             as TIO
 import           Format
 import           Language.Dickinson       (dickinsonVersionString)

diff --git a/run/REPL.hs b/run/REPL.hs
@@ -14,7 +14,6 @@ import qualified Data.IntMap                    as IM
 import qualified Data.IntSet                    as IS
 import qualified Data.Map                       as M
 import           Data.Maybe                     (fromJust)
-import           Data.Semigroup                 ((<>))
 import qualified Data.Text                      as T
 import qualified Data.Text.IO                   as TIO
 import qualified Data.Text.Lazy                 as TL

diff --git a/run/REPL/Save.cpphs b/run/REPL/Save.cpphs
@@ -10,7 +10,6 @@ import           Data.Binary.Get             (runGet)
 import           Data.Binary.Put             (runPut)
 import qualified Data.ByteString.Lazy        as BSL
 import qualified Data.Map                    as M
-import           Data.Semigroup              ((<>))
 import qualified Data.Text                   as T
 import           Language.Dickinson.Eval
 import           Language.Dickinson.Lexer

diff --git a/src/Data/Text/Prettyprint/Doc/Ext.hs b/src/Data/Text/Prettyprint/Doc/Ext.hs
@@ -19,7 +19,6 @@ module Data.Text.Prettyprint.Doc.Ext ( prettyText
 
 import qualified Data.IntMap               as IM
 import           Data.List                 (intersperse)
-import           Data.Semigroup            ((<>))
 import qualified Data.Text                 as T
 import qualified Data.Text.Lazy            as TL
 import           Prettyprinter             (Doc, LayoutOptions (LayoutOptions), PageWidth (AvailablePerLine), Pretty (pretty), SimpleDocStream, concatWith,

diff --git a/src/Language/Dickinson/Error.hs b/src/Language/Dickinson/Error.hs
@@ -10,7 +10,6 @@ module Language.Dickinson.Error ( DickinsonError (..)
 import           Control.DeepSeq           (NFData)
 import           Control.Exception         (Exception)
 import           Control.Monad.Except      (MonadError, throwError)
-import           Data.Semigroup            ((<>))
 import qualified Data.Text                 as T
 import           Data.Typeable             (Typeable)
 import           GHC.Generics              (Generic)

diff --git a/src/Language/Dickinson/Import.hs b/src/Language/Dickinson/Import.hs
@@ -4,7 +4,6 @@ module Language.Dickinson.Import ( resolveImport
 import           Control.Monad           (filterM)
 import           Control.Monad.IO.Class  (MonadIO (..))
 import           Data.Maybe              (listToMaybe)
-import           Data.Semigroup          ((<>))
 import qualified Data.Text               as T
 import           Language.Dickinson.Name
 import           System.Directory        (doesFileExist)

diff --git a/src/Language/Dickinson/Lexer.x b/src/Language/Dickinson/Lexer.x
@@ -33,7 +33,6 @@ import Data.Functor (($>))
 import qualified Data.IntMap as IM
 import qualified Data.List.NonEmpty as NE
 import qualified Data.Map as M
-import Data.Semigroup ((<>))
 import qualified Data.Text as T
 import Data.Text.Encoding (decodeUtf8)
 import Prettyprinter (Pretty (pretty), pipe, lparen, rparen, rbrace, rbracket, lbracket, colon, squotes, dquotes, dquote, rangle, comma, (<+>))

diff --git a/src/Language/Dickinson/Name.hs b/src/Language/Dickinson/Name.hs
@@ -16,7 +16,6 @@ import           Data.Data                     (Data)
 import           Data.Foldable                 (toList)
 import qualified Data.IntMap                   as IM
 import           Data.List.NonEmpty            (NonEmpty (..))
-import           Data.Semigroup                ((<>))
 import qualified Data.Text                     as T
 import           Data.Text.Prettyprint.Doc.Ext (Debug (..), intercalate)
 import           GHC.Generics                  (Generic)

diff --git a/src/Language/Dickinson/Parser.y b/src/Language/Dickinson/Parser.y
@@ -22,7 +22,6 @@ import Data.Foldable (toList)
 import qualified Data.List.NonEmpty as NE
 import Data.List.NonEmpty (NonEmpty ((:|)), (<|))
 import Data.Maybe (mapMaybe)
-import Data.Semigroup ((<>))
 import qualified Data.Text as T
 import Data.Text.Encoding (decodeUtf8)
 import Prettyprinter (Pretty (pretty), (<+>))

diff --git a/src/Language/Dickinson/Rename/Amalgamate.hs b/src/Language/Dickinson/Rename/Amalgamate.hs
@@ -12,7 +12,6 @@ import           Control.Monad.IO.Class           (MonadIO)
 import           Control.Monad.State              (MonadState)
 import qualified Data.ByteString.Lazy             as BSL
 import           Data.Functor                     (($>))
-import           Data.Semigroup                   ((<>))
 import           Language.Dickinson.Check.Pattern
 import           Language.Dickinson.Error
 import           Language.Dickinson.Lexer

diff --git a/src/Language/Dickinson/Type.hs b/src/Language/Dickinson/Type.hs
@@ -20,7 +20,6 @@ import           Data.Data                     (Data)
 import           Data.Foldable                 (toList)
 import           Data.List.NonEmpty            (NonEmpty (..))
 import qualified Data.List.NonEmpty            as NE
-import           Data.Semigroup                ((<>))
 import qualified Data.Text                     as T
 import           Data.Text.Prettyprint.Doc.Ext (Debug (..), hardSep, (<#*>), (<#>), (<^>))
 import           GHC.Generics                  (Generic)