From 8bc8ddf5641a67079fbd7dd3e808a0d56752e9d4 Mon Sep 17 00:00:00 2001
From: Dmitry Zuikov <dzuikov@gmail.com>
Date: Sun, 22 Jan 2023 13:05:26 +0300
Subject: [PATCH] wip

---
 hbs2-tests/test/Peer2Main.hs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/hbs2-tests/test/Peer2Main.hs b/hbs2-tests/test/Peer2Main.hs
index 45c8857f..c77e0230 100644
--- a/hbs2-tests/test/Peer2Main.hs
+++ b/hbs2-tests/test/Peer2Main.hs
@@ -203,6 +203,7 @@ mkAdapter :: forall e m . ( m ~  PeerM e IO
                           , Sessions e (BlockChunks e) (ResponseM e m)
                           , EventEmitter e (BlockChunks e) m
                           , Pretty (Peer e)
+                          , Block ByteString ~ ByteString
                           )
           => ChunkWriter HbSync IO -> m (BlockChunksI e (ResponseM e m ))
 mkAdapter cww = do