safecopy 0.9.1 → 0.9.2

raw patch · 2 files changed

+10/−2 lines, 2 files

Files

• safecopy.cabal +2/−2
• test/instances.hs +8/−0

@@ -3,10 +3,10 @@ -- http://www.haskell.org/cabal/release/cabal-latest/doc/users-guide/authors.html#pkg-descr. -- The name of the package. Name:                safecopy-Version:             0.9.1+Version:             0.9.2 Synopsis:            Binary serialization with version control. Description:         An extension to Data.Serialize with built-in version control.-Homepage:            http://acid-state.seize.it/safecopy+Homepage:            https://github.com/acid-state/safecopy License:             PublicDomain Author:              David Himmelstrup, Felipe Lessa Maintainer:          Lemmih <lemmih@gmail.com>

@@ -32,6 +32,7 @@ import qualified Data.Vector.Storable as VS import qualified Data.Vector.Unboxed as VU +#if ! MIN_VERSION_QuickCheck(2,9,0) instance (Arbitrary a, Arbitrary b, Arbitrary c, Arbitrary d, Arbitrary e, Arbitrary f) =>          Arbitrary (a,b,c,d,e,f) where    arbitrary = (,,,,,) <$> arbitrary <*> arbitrary <*> arbitrary <*>@@ -41,6 +42,7 @@          Arbitrary (a,b,c,d,e,f,g) where    arbitrary = (,,,,,,) <$> arbitrary <*> arbitrary <*> arbitrary <*>                             arbitrary <*> arbitrary <*> arbitrary <*> arbitrary+#endif  #if ! MIN_VERSION_QuickCheck(2,8,2) instance (Arbitrary a) => Arbitrary (V.Vector a) where@@ -61,7 +63,9 @@ deriving instance (Show a) => Show (Prim a)  deriving instance Eq ZonedTime+#if ! MIN_VERSION_time(1,6,0) deriving instance Show UniversalTime+#endif  -- | Equality on the 'Right' value, showing the unequal value on failure; -- or explicit failure using the 'Left' message without equality testing.@@ -115,7 +119,11 @@ #endif    def <- a +#if MIN_VERSION_template_haskell(2,11,0)+   let instances (ClassI _ decs) = [ typ | InstanceD _ _ (AppT _ typ) _ <- decs ]+#else    let instances (ClassI _ decs) = [ typ | InstanceD _ (AppT _ typ) _ <- decs ]+#endif        instances _ = []        types = map instances classes