@@ -11,7 +11,7 @@ module Distribution.Nixpkgs.Haskell.BuildInfo
12import Control.DeepSeq
12import Control.DeepSeq
13import Control.Lens
13import Control.Lens
14−import Data.Semigroup
14+import Data.Semigroup as Sem
15import Data.Set ( Set )
15import Data.Set ( Set )
16import Data.Set.Lens
16import Data.Set.Lens
17import GHC.Generics ( Generic )
17import GHC.Generics ( Generic )
@@ -31,13 +31,13 @@ makeLenses ''BuildInfo
31instance Each BuildInfo BuildInfo (Set Binding) (Set Binding) where
31instance Each BuildInfo BuildInfo (Set Binding) (Set Binding) where
32 each f (BuildInfo a b c d) = BuildInfo <$> f a <*> f b <*> f c <*> f d
32 each f (BuildInfo a b c d) = BuildInfo <$> f a <*> f b <*> f c <*> f d
34−instance Semigroup BuildInfo where
34+instance Sem.Semigroup BuildInfo where
35 BuildInfo w1 x1 y1 z1 <> BuildInfo w2 x2 y2 z2 =
35 BuildInfo w1 x1 y1 z1 <> BuildInfo w2 x2 y2 z2 =
36 BuildInfo (w1 <> w2) (x1 <> x2) (y1 <> y2) (z1 <> z2)
36 BuildInfo (w1 <> w2) (x1 <> x2) (y1 <> y2) (z1 <> z2)
38instance Monoid BuildInfo where
38instance Monoid BuildInfo where
39 mempty = BuildInfo mempty mempty mempty mempty
39 mempty = BuildInfo mempty mempty mempty mempty
40− mappend = (<>)
40+ mappend = (Sem.<>)
42instance NFData BuildInfo
42instance NFData BuildInfo