uniform-pair 0.1.13 → 0.1.14
raw patch · 2 files changed
+6/−3 lines, 2 files
Files
- src/Data/UniformPair.hs +5/−2
- uniform-pair.cabal +1/−1
src/Data/UniformPair.hs view
@@ -1,4 +1,5 @@-{-# LANGUAGE CPP, DeriveFunctor, DeriveFoldable, DeriveTraversable #-}+{-# LANGUAGE CPP, DeriveDataTypeable, DeriveFunctor, DeriveFoldable,+ DeriveTraversable #-} {-# OPTIONS_GHC -Wall #-} #if MIN_VERSION_base(4,9,0) #define LIFTED_FUNCTOR_CLASSES 1@@ -34,6 +35,7 @@ ( Pair(..), fstP,sndP, firstP, secondP, getP, onElemP, swapP, compareSwap ) where +import Data.Data (Data, Typeable) import Data.Monoid (Monoid(..)) import Data.Semigroup (Semigroup (..)) import Data.Functor ((<$>))@@ -48,7 +50,8 @@ infix 1 :# -- | Uniform pairs-data Pair a = a :# a deriving (Eq, Ord, Show, Functor, Foldable,Traversable)+data Pair a = a :# a+ deriving (Data, Eq, Ord, Show, Functor, Foldable, Traversable, Typeable) -- instance Traversable Pair where sequenceA (u :# v) = (:#) <$> u <*> v
uniform-pair.cabal view
@@ -1,5 +1,5 @@ Name: uniform-pair-Version: 0.1.13+Version: 0.1.14 Cabal-Version: >= 1.6 Synopsis: Uniform pairs with class instances Category: Data