From 3fd158069db42bc52bf21ca222502a651b71c29f Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Wed, 23 Apr 2025 15:11:26 +0200 Subject: test: up 'random' dependency --- test/Gen.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'test/Gen.hs') diff --git a/test/Gen.hs b/test/Gen.hs index 695b83f..244c735 100644 --- a/test/Gen.hs +++ b/test/Gen.hs @@ -124,7 +124,7 @@ genStorables rng f = do n <- Gen.int rng seed <- Gen.resize 99 $ Gen.int Range.linearBounded let gen0 = Random.mkStdGen seed - (bs, _) = Random.genByteString (8 * n) gen0 + (bs, _) = Random.uniformByteString (8 * n) gen0 let readW64 i = sum (zipWith (*) (iterate (*256) 1) [fromIntegral (bs `BS.index` (8 * i + j)) | j <- [0..7]]) return $ VS.generate n (f . readW64) -- cgit v1.2.3-70-g09d2