git.iko.soy/typeable/uuid
on master help sign in
Optimise UUID V4 generation
a507683Herbert Valerio Riedel
uuid/Data/UUID/V4.hs+1−1
compare with master
unifiedsplit
@@ -23,7 +23,7 @@ module Data.UUID.V4 (nextRandom) where
23import Data.UUID
23import Data.UUID
24import Data.UUID.Types.Internal ( buildFromBytes )
24import Data.UUID.Types.Internal ( buildFromBytes )
25
25
26−import Crypto.Random.Entropy ( getEntropy )
26+import System.Entropy ( getEntropy )
27import Data.ByteString ( unpack )
27import Data.ByteString ( unpack )
28
28
29-- | Generate a random UUID. Introduced in version 1.2.6.
29-- | Generate a random UUID. Introduced in version 1.2.6.
uuid/uuid.cabal+1−2
@@ -34,8 +34,7 @@ Library
34 bytestring >= 0.10 && < 0.11,
34 bytestring >= 0.10 && < 0.11,
35 cryptohash-sha1 >= 0.11.100 && < 0.12,
35 cryptohash-sha1 >= 0.11.100 && < 0.12,
36 cryptohash-md5 >= 0.11.100 && < 0.12,
36 cryptohash-md5 >= 0.11.100 && < 0.12,
37− cryptonite >= 0.1 && < 0.21,
37+ entropy >= 0.3.7 && < 0.4,
38− memory >= 0.2 && < 0.14,
39 network-info == 0.2.*,
38 network-info == 0.2.*,
40 random >= 1.0.1 && < 1.2,
39 random >= 1.0.1 && < 1.2,
41 time >= 1.1 && < 1.8,
40 time >= 1.1 && < 1.8,