From 25f857f8894528489468eab0f4baa8da0109e5bf Mon Sep 17 00:00:00 2001 From: Dmitry Zuikov Date: Wed, 25 Jan 2023 13:37:10 +0300 Subject: [PATCH] wip --- hbs2-tests/test/TestChunkWriter.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/hbs2-tests/test/TestChunkWriter.hs b/hbs2-tests/test/TestChunkWriter.hs index 0296f56a..fe5e25e9 100644 --- a/hbs2-tests/test/TestChunkWriter.hs +++ b/hbs2-tests/test/TestChunkWriter.hs @@ -53,8 +53,8 @@ main = do psz' <- shuffleM psz -- psz' <- pure psz - -- forConcurrently_ psz' $ \(o,s) -> do - forM_ psz' $ \(o,s) -> do + forConcurrently_ psz' $ \(o,s) -> do + -- forM_ psz' $ \(o,s) -> do let t = B8.take s $ B8.drop o bytes writeChunk cw 1 hash (fromIntegral o) t