voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

hunting random freezes

This commit is contained in:
voidlizard 2025-02-18 08:35:32 +03:00
parent ca05c2a17a
commit df98ba225e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hbs2-core/lib/HBS2/Actors/Peer.hs
View File

@ -451,7 +451,7 @@ runPeerM env@PeerEnv{..} f = flip runContT pure do
n <- liftIO getNumCapabilities <&> max 2 . div 2 n <- liftIO getNumCapabilities <&> max 2 . div 2
as <- liftIO $ replicateM n $ async $ runPipeline _envDeferred as <- liftIO $ replicateM n $ asyncLinked $ runPipeline _envDeferred
sw <- liftIO $ async $ forever $ withPeerM env $ do sw <- liftIO $ async $ forever $ withPeerM env $ do
pause defSweepTimeout pause defSweepTimeout