From 862fdc37320e77b5ecd93d9dd8af98ef1eb533d9 Mon Sep 17 00:00:00 2001 From: Jonathan Knowles Date: Wed, 16 Jun 2021 04:50:02 +0000 Subject: [PATCH] Reduce the number of concurrent request threads in middleware tests. Experimental testing shows that this lowers the virtual memory footprint of these tests. --- lib/core/test/unit/Network/Wai/Middleware/LoggingSpec.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/core/test/unit/Network/Wai/Middleware/LoggingSpec.hs b/lib/core/test/unit/Network/Wai/Middleware/LoggingSpec.hs index 3702e5b5f79..0ac33335f34 100644 --- a/lib/core/test/unit/Network/Wai/Middleware/LoggingSpec.hs +++ b/lib/core/test/unit/Network/Wai/Middleware/LoggingSpec.hs @@ -380,7 +380,7 @@ newtype NumberOfRequests = NumberOfRequests Int deriving Show instance Arbitrary NumberOfRequests where shrink (NumberOfRequests n) = fmap NumberOfRequests $ filter (> 0) $ shrink n - arbitrary = NumberOfRequests <$> choose (1, 100) + arbitrary = NumberOfRequests <$> choose (1, 8) newtype RandomIndex = RandomIndex Int deriving Show