From d1a28900ea59e0850fd4ae65f0ebcef9e1a5bf9e Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Thu, 24 Mar 2022 12:22:07 -0400 Subject: qualify GHC.Generics to avoid warning Seems that Generic is in scope w/o the import in new ghc, I assume but have not verified that old ghc needed the import. --- Val.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Val.hs') diff --git a/Val.hs b/Val.hs index 5c52c82..d010a2a 100644 --- a/Val.hs +++ b/Val.hs @@ -9,8 +9,8 @@ module Val where import Memory import JSON +import qualified GHC.Generics as G -import GHC.Generics (Generic) import Data.Aeson.Types import qualified Codec.Binary.Base64 as B64 import qualified Data.Text as T @@ -20,7 +20,7 @@ import qualified Data.Semigroup as Sem -- | Newtype of ByteString so we can have JSON instances without orphans. newtype Val = Val { val :: B.ByteString } - deriving (Show, Generic, Eq, Sem.Semigroup, Monoid) + deriving (Show, G.Generic, Eq, Sem.Semigroup, Monoid) instance DataSize Val where dataSize (Val b) = fromIntegral (B.length b) -- cgit v1.2.3