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

DDD works

This commit is contained in:
voidlizard 2024-11-14 12:55:04 +03:00
parent 930c8b0a7b
commit 96322d15ff
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-peer/app/BlockDownloadNew.hs
View File

@ -661,7 +661,7 @@ downloadDispatcher brains env = flip runContT pure do
Just s -> pure s Just s -> pure s
Nothing -> do Nothing -> do
-- TODO: semaphore-hardcode -- TODO: semaphore-hardcode
new <- TSem.newTSem 10 new <- TSem.newTSem 50
modifyTVar _psem (HM.insert nonce new) modifyTVar _psem (HM.insert nonce new)
pure new pure new