dandri/simplexmq
1
0
Fork 0
mirror of https://github.com/simplex-chat/simplexmq.git synced 2026-06-07 15:22:03 +00:00
Code Issues Packages Projects Releases Wiki Activity

refactor transport encoding, make client IO error "temporary" (#634)

Browse Source 
* file server/client framework

* refactor

* make IOError temporary

* fix test
This commit is contained in:
Evgeny Poberezkin
2023-02-10 19:06:28 +00:00
committed by GitHub
parent b342b1dc59
commit eb1723acce
9 changed files with 55 additions and 36 deletions
Download Patch File Download Diff File Expand all files Collapse all files
src/Simplex/Messaging/Notifications/Server.hs
+1 -1
View File
@@ -319,7 +319,7 @@ clientDisconnected NtfServerClient {connected} = atomically $ writeTVar connecte
receive :: Transport c => THandle c -> NtfServerClient -> M ()
receive th NtfServerClient {rcvQ, sndQ, activeAt} = forever $ do
ts <- tGet th
ts <- liftIO $ tGet th
forM_ ts $ \t@(_, _, (corrId, entId, cmdOrError)) -> do
atomically . writeTVar activeAt =<< liftIO getSystemTime
logDebug "received transmission"