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:
Dmitry Zuikov 2023-01-24 13:20:33 +03:00
parent 07937ce32b
commit e63441b289
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
hbs2-tests/test/Peer2Main.hs
View File

@ -404,11 +404,18 @@ mkAdapter cww = do
-- мы не знаем, что там еще 3 события. -- мы не знаем, что там еще 3 события.
-- --
-- таким образом, ни про какое событие нельзя понять, -- таким образом, ни про какое событие нельзя понять,
-- что оно последнее -- что оно последнее, если у нас 4 потока.
-- --
-- как же нам узнать, что пришёл последний блок и можно -- как же нам узнать, что пришёл последний блок и можно
-- его коммитить? -- его коммитить?
-- --
--
-- вариант N1. повесить "добивающий монитор".
-- Здесь только апдейтить счётчики, а вот монитор будет уже
-- смотреть что как и коммитить.
--
-- Монитор может быть протухающим.
-- Как это сделать?
let mbDone = (maxOffLast + fromIntegral mbChSize) > fromIntegral mbSize let mbDone = (maxOffLast + fromIntegral mbChSize) > fromIntegral mbSize
&& writtenLast >= ( (mbSize * 2) `div` 3 ) && writtenLast >= ( (mbSize * 2) `div` 3 )