From 1671d1c182ca78cb1c569d16f75ae1c6c9023fab Mon Sep 17 00:00:00 2001 From: Patrick Thomson Date: Fri, 17 Jan 2020 14:59:49 -0500 Subject: [PATCH] No more IsString instance needed here. --- test/SpecHelpers.hs | 6 ------ 1 file changed, 6 deletions(-) diff --git a/test/SpecHelpers.hs b/test/SpecHelpers.hs index 986ea9dc1..92a6dec8d 100644 --- a/test/SpecHelpers.hs +++ b/test/SpecHelpers.hs @@ -58,7 +58,6 @@ import Data.Project as X import Data.Proxy as X import Data.Semigroup as X (Semigroup(..)) import Data.Semilattice.Lower as X -import Data.String import Data.Sum as Sum import Data.Term as X import Data.Traversable as X (for) @@ -84,11 +83,6 @@ import Unsafe.Coerce (unsafeCoerce) runBuilder :: Builder -> ByteString runBuilder = toStrict . toLazyByteString --- | This orphan instance is so we don't have to insert @name@ calls --- in dozens and dozens of environment specs. -instance IsString Name where - fromString = X.name . fromString - -- | Returns an s-expression formatted diff for the specified FilePath pair. diffFilePaths :: TaskSession -> Path.RelFile -> Path.RelFile -> IO ByteString diffFilePaths session p1 p2 = do