From 7de1415d7f2889a9fe707235a8ce74122666a1cf Mon Sep 17 00:00:00 2001 From: voidlizard Date: Sat, 9 Nov 2024 10:45:13 +0300 Subject: [PATCH] wip --- hbs2-peer/app/BlockDownloadNew.hs | 2 ++ 1 file changed, 2 insertions(+) diff --git a/hbs2-peer/app/BlockDownloadNew.hs b/hbs2-peer/app/BlockDownloadNew.hs index 7dec176a..54fd6515 100644 --- a/hbs2-peer/app/BlockDownloadNew.hs +++ b/hbs2-peer/app/BlockDownloadNew.hs @@ -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