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

wip

This commit is contained in:
voidlizard 2024-11-09 10:45:13 +03:00
parent e53273d3b6
commit 7de1415d7f
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
hbs2-peer/app/BlockDownloadNew.hs
View File

@ -655,9 +655,11 @@ downloadDispatcher brains env = flip runContT pure do
pause @'Seconds 10
size <- atomically $ readTVar blkQ <&> HPSQ.size
seenSize <- atomically $ readTVar seen <&> HPSQ.size
sizeCacheSize <- atomically $ readTVar sizeCache <&> HPSQ.size
debug $ yellow $ "I'm download dispatcher"
debug $ yellow $ "wip:" <+> pretty size
debug $ yellow $ "seen:" <+> pretty seenSize
debug $ yellow $ "sizes:" <+> pretty sizeCacheSize
where