b11962a · typeable/uuid

git.iko.soy/typeable/uuid

update testing dependencies

commitb11962aa89627c9a1c275b784249c2113bf4f74c authorAntoine Latter <aslatter@gmail.com> dateWed 14 Mar 2012, 02:17 (15 years ago) parent1825bcb

2 files changed+9−10

compare with master

unifiedsplit

tests/TestUUID.hs+5−6 uuid.cabal+4−4

tests/TestUUID.hs+5−6

@@ -10,7 +10,7 @@ import qualified Data.UUID.V1 as U

1010import qualified Data.UUID.V3 as U3

1111import qualified Data.UUID.V5 as U5

1212import Test.HUnit

13−import Test.QuickCheck

13+import Test.QuickCheck hiding ((.&.))

1414import System.IO

1515import System.Random

1616

@@ -24,12 +24,11 @@ isValidVersion v u = lenOK && variantOK && versionOK

2424

2525

2626instance Arbitrary U.UUID where

27− arbitrary = (fst . random) `fmap` rand

28− coarbitrary = undefined

27+ -- the UUID random instance ignores bounds

28+ arbitrary = choose (U.nil, U.nil)

2929

30−instance Arbitrary Word8 where

31− arbitrary = (fromIntegral . fst . randomR (0,255::Int)) `fmap` rand

32− coarbitrary = undefined

30+-- instance Arbitrary Word8 where

31+-- arbitrary = (fromIntegral . fst . randomR (0,255::Int)) `fmap` rand

3332

3433

3534test_null :: Test

uuid.cabal+4−4

@@ -1,6 +1,6 @@

11Name: uuid

22Version: 1.2.3

44Author: Antoine Latter

55Maintainer: aslatter@gmail.com

66License: BSD3

@@ -56,8 +56,8 @@ Test-Suite benchmark

5656 Main-is: BenchUUID.hs

5757 Hs-source-dirs: tests

5858 Extensions: DeriveDataTypeable, CPP

59− Build-depends: base == 4.*, uuid, random, criterion >= 0.4 && < 0.6, mersenne-random-pure64,

60− bytestring == 0.9.*, containers == 0.4.*, deepseq == 1.1.*

59+ Build-depends: base == 4.*, uuid, random, criterion >= 0.4 && < 0.7, mersenne-random-pure64,

60+ bytestring == 0.9.*, containers == 0.4.*, deepseq >= 1.1 && < 1.4

6161

6262Test-Suite testuuid

6363 Type: exitcode-stdio-1.0

@@ -66,4 +66,4 @@ Test-Suite testuuid

6666 Extensions: DeriveDataTypeable

6767 Ghc-Options: -Wall -fno-warn-orphans

6868 Build-Depends: random, bytestring, base >=3, base < 5, uuid,

69− HUnit >=1.2 && < 1.3, QuickCheck >=1.2 && < 1.3

69+ HUnit >=1.2 && < 1.3, QuickCheck >=2.4 && < 2.5