mirror of https://github.com/voidlizard/hbs2
fix
This commit is contained in:
parent
5cb86b714d
commit
db15709e87
|
@ -234,7 +234,6 @@ runBurstMachine BurstMachine{..} = do
|
|||
|
||||
atomically do
|
||||
e <- headDef bu0 . Map.elems <$> readTVar _rates
|
||||
writeTVar _rates mempty
|
||||
nrates <- readTVar _rates <&> take 100 . Map.toList
|
||||
writeTVar _rates (Map.fromList nrates)
|
||||
modifyTVar _buMaxReal (max e)
|
||||
|
|
Loading…
Reference in New Issue