Reduce CAS retry to 25 from 30
Slightly better perf on macbook pro measured with parallely/foldMapWith*
benchmarks
commitff475e77d17c7e174942f9380fa52231c0e1653d
authorHarendra Kumar <harendra.kumar@gmail.com>
dateFri 1 Jun 2018, 11:50 (8 years ago)
parentc9fdf94
src/Streamly/Core.hs+1−1
@@ -281,7 +281,7 @@ atomicModifyIORefCAS ref fn = do
281281
282282 where
283283
284− retries = 30 :: Int
284+ retries = 25 :: Int
285285 loop _ 0 = atomicModifyIORef ref fn
286286 loop old tries = do
287287 let (new, result) = fn $ peekTicket old