From bb32e8b97cfd033465b19d845ec84a25d1e52e0c Mon Sep 17 00:00:00 2001 From: Dmitry Zuikov Date: Tue, 18 Jul 2023 09:24:14 +0300 Subject: [PATCH] wip --- hbs2-core/lib/HBS2/Net/Proto/RefChan.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs b/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs index 85b52c6e..2f34417b 100644 --- a/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs +++ b/hbs2-core/lib/HBS2/Net/Proto/RefChan.hs @@ -425,7 +425,7 @@ refChanUpdateProto self pc adapter msg = do debug $ "ACCEPTS:" <+> pretty accepts -- FIXME: round! - when (accepts > 2) do + when (accepts >= 2) do debug $ "ROUND!" <+> pretty accepts <+> pretty hashRef -- TODO: implement-accept