This commit is contained in:
Dmitry Zuikov 2023-01-18 06:22:54 +03:00
parent 85ad732cfc
commit 6021c70aef
1 changed files with 2 additions and 2 deletions

View File

@ -67,8 +67,8 @@ dontHandle :: Applicative f => a -> f ()
dontHandle = const $ pure ()
blockSizeProto :: forall e m . ( MonadIO m
, Response e (BlockSize e) m
)
, Response e (BlockSize e) m
)
=> GetBlockSize HbSync m
-> HasBlockEvent HbSync e m
-> BlockSize e