1
1
mirror of https://github.com/github/semantic.git synced 2024-12-01 00:33:59 +03:00

🔥 a bunch more redundant imports.

This commit is contained in:
Rob Rix 2017-09-09 14:58:07 +01:00
parent 10b262e069
commit 2a7a937a7e
4 changed files with 2 additions and 13 deletions

View File

@ -3,12 +3,11 @@ module AlignmentSpec where
import Alignment import Alignment
import Control.Arrow ((&&&)) import Control.Arrow ((&&&))
import Control.Monad.Free (Free, wrap) import Control.Monad.Free (wrap)
import Control.Monad.State import Control.Monad.State
import Data.Align hiding (align) import Data.Align hiding (align)
import Data.Bifunctor import Data.Bifunctor
import Data.Bifunctor.Join import Data.Bifunctor.Join
import Data.Foldable (toList)
import Data.Functor.Both as Both hiding (fst, snd) import Data.Functor.Both as Both hiding (fst, snd)
import Data.Functor.Listable import Data.Functor.Listable
import Data.List (nub, sort) import Data.List (nub, sort)
@ -21,7 +20,6 @@ import qualified Data.Source as Source
import qualified Data.Text as Text import qualified Data.Text as Text
import Data.These import Data.These
import Diff import Diff
import Patch
import SplitDiff import SplitDiff
import Syntax import Syntax
import Term import Term

View File

@ -4,12 +4,11 @@ module Data.RandomWalkSimilarity.Spec where
import Category import Category
import Data.Array.IArray import Data.Array.IArray
import Data.Bifunctor import Data.Bifunctor
import Data.Functor.Listable import Data.Functor.Listable ()
import Data.Record import Data.Record
import Data.These import Data.These
import Diff import Diff
import Info import Info
import Patch
import RWS import RWS
import Syntax import Syntax
import Term import Term

View File

@ -2,14 +2,12 @@
module InterpreterSpec where module InterpreterSpec where
import Category import Category
import Control.Monad.Free (wrap)
import Data.Functor.Both import Data.Functor.Both
import Data.Functor.Foldable hiding (Nil) import Data.Functor.Foldable hiding (Nil)
import Data.Functor.Listable import Data.Functor.Listable
import Data.Record import Data.Record
import Diff import Diff
import Interpreter import Interpreter
import Patch
import Syntax import Syntax
import Term import Term
import Test.Hspec (Spec, describe, it, parallel) import Test.Hspec (Spec, describe, it, parallel)

View File

@ -7,23 +7,17 @@ module SpecHelpers
) where ) where
import Control.Exception import Control.Exception
import Control.Monad.Free (Free, hoistFree)
import Data.Bifunctor (first)
import Data.Blob import Data.Blob
import qualified Data.ByteString as B import qualified Data.ByteString as B
import Data.Functor.Both import Data.Functor.Both
import Data.Functor.Listable
import Data.Maybe (fromMaybe) import Data.Maybe (fromMaybe)
import Data.Source import Data.Source
import Diff
import Language import Language
import Patch
import Prelude hiding (readFile) import Prelude hiding (readFile)
import Renderer import Renderer
import Semantic import Semantic
import Semantic.Task import Semantic.Task
import System.FilePath import System.FilePath
import Term
-- | Returns an s-expression formatted diff for the specified FilePath pair. -- | Returns an s-expression formatted diff for the specified FilePath pair.
diffFilePaths :: Both FilePath -> IO B.ByteString diffFilePaths :: Both FilePath -> IO B.ByteString