From ebf2014b98005db7c65e87bf1ffa440d3036015f Mon Sep 17 00:00:00 2001 From: voidlizard Date: Tue, 5 Nov 2024 19:25:59 +0300 Subject: [PATCH] fixed wtf --- hbs2-peer/app/RPC2.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hbs2-peer/app/RPC2.hs b/hbs2-peer/app/RPC2.hs index 9cdbb6e5..08bd414b 100644 --- a/hbs2-peer/app/RPC2.hs +++ b/hbs2-peer/app/RPC2.hs @@ -337,7 +337,7 @@ downloadFromPeer t bu cache env h peer = liftIO $ withPeerM env do s1 <- readTVarIO _sBlockChunks2 <&> IntMap.size pause @'MilliSeconds ( max (realToFrac chunkN * rtt) 2000 ) s2 <- readTVarIO _sBlockChunks2 <&> IntMap.size - when (s1 == s2) next + when (s1 /= s2) next r <- liftIO $ race watchdog do