Even more unused imports.

Author: Patrick Thomson

test/Control/Abstract/Evaluator/Spec.hs

@@ -8,19 +8,14 @@ import qualified Control.Abstract.Heap as Heap
 import           Data.Abstract.Address.Precise as Precise
 import           Data.Abstract.BaseError
 import           Data.Abstract.Evaluatable
-import           Data.Abstract.FreeVariables
 import           Data.Abstract.Module
 import qualified Data.Abstract.Number as Number
 import           Data.Abstract.Package
 import qualified Data.Abstract.ScopeGraph as ScopeGraph
 import           Data.Abstract.Value.Concrete as Value
-import           Data.Algebra
-import           Data.Bifunctor (first)
-import           Data.Functor.Const
 import qualified Data.Language as Language
 import qualified Data.Map.Strict as Map
 import           Data.Sum
-import           Data.Text (pack)
 import           SpecHelpers hiding (reassociate)
 import           System.IO.Unsafe (unsafePerformIO)
 

test/Data/Abstract/Name/Spec.hs

@@ -2,8 +2,6 @@ module Data.Abstract.Name.Spec where
 
 import SpecHelpers
 
-import Data.Abstract.Name
-
 spec :: Spec
 spec = describe "Data.Abstract.Name" $
   it "should format anonymous names correctly" $ do

test/Graphing/Calls/Spec.hs

@@ -8,14 +8,10 @@ import SpecHelpers hiding (readFile)
 import Algebra.Graph
 import Data.List (uncons)
 
-import           Data.Abstract.Module
 import           "semantic" Data.Graph (Graph (..), topologicalSort)
 import           Data.Graph.ControlFlowVertex
-import           Data.Span
 import qualified Data.Language as Language
-import           Semantic.Config (defaultOptions)
 import           Semantic.Graph
-import           Semantic.IO
 
 callGraphPythonProject paths = runTaskOrDie $ do
   let proxy = Proxy @'Language.Python

test/Integration/Spec.hs

@@ -2,9 +2,8 @@
 module Integration.Spec (spec) where
 
 import Control.Exception (throw)
-import Data.Foldable (find, traverse_, for_)
+import Data.Foldable (find)
 import Data.List (union, concat, transpose)
-import qualified Data.ByteString as B
 import qualified Data.ByteString.Lazy as BL
 import System.FilePath.Glob
 import System.FilePath.Posix

test/Parsing/Spec.hs

@@ -1,6 +1,5 @@
 module Parsing.Spec (spec) where
 
-import Control.Effect
 import Data.AST
 import Data.Blob
 import Data.ByteString.Char8 (pack)
@@ -9,9 +8,7 @@ import Data.Language
 import Data.Maybe
 import Data.Source
 import Parsing.TreeSitter
-import Semantic.Config
 import SpecHelpers
-import System.Timeout
 import TreeSitter.JSON (tree_sitter_json, Grammar)
 
 spec :: Spec

test/Rendering/TOC/Spec.hs

@@ -10,20 +10,17 @@ import Data.Diff
 import Data.Functor.Classes
 import Data.Hashable.Lifted
 import Data.Patch
-import Data.Range
 import Data.Location
 import Data.Span
 import Data.Sum
 import Data.Term
 import Data.Text (Text)
-import Data.Text.Encoding (encodeUtf8)
 import Diffing.Algorithm hiding (Diff)
 import Diffing.Interpreter
 import Prelude
 import qualified Data.Syntax as Syntax
 import qualified Data.Syntax.Declaration as Declaration
 import Rendering.TOC
-import Semantic.Config
 import Semantic.Api (diffSummaryBuilder)
 import Serializing.Format as Format
 

test/Spec.hs

@@ -39,7 +39,6 @@ import Semantic.Task (withOptions, TaskSession(..))
 import Test.Hspec
 import Test.Tasty as Tasty
 import Test.Tasty.Hspec as Tasty
-import Test.Tasty.Options as Tasty
 
 tests :: TaskSession -> [TestTree]
 tests session =