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

fix

This commit is contained in:
voidlizard 2024-11-06 12:54:21 +03:00
parent 44d6f72526
commit 3421a14c80
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
hbs2-peer/app/RPC2.hs
View File

@ -234,7 +234,6 @@ runBurstMachine BurstMachine{..} = do
atomically do atomically do
e <- headDef bu0 . Map.elems <$> readTVar _rates e <- headDef bu0 . Map.elems <$> readTVar _rates
writeTVar _rates mempty
nrates <- readTVar _rates <&> take 100 . Map.toList nrates <- readTVar _rates <&> take 100 . Map.toList
writeTVar _rates (Map.fromList nrates) writeTVar _rates (Map.fromList nrates)
modifyTVar _buMaxReal (max e) modifyTVar _buMaxReal (max e)