launch stabilise thread

closes #44

although stabilise functionality is still untested
This commit is contained in:
Trolli Schmittlauch 2020-06-24 02:51:28 +02:00
parent 81e346db4e
commit c9783a10cf

View file

@ -307,7 +307,8 @@ fediMainThreads sock nsSTM = do
-- all get cancelled -- all get cancelled
concurrently_ concurrently_
(fediMessageHandler sendQ recvQ nsSTM) $ (fediMessageHandler sendQ recvQ nsSTM) $
concurrently concurrently_ (stabiliseThread nsSTM) $
concurrently_
(sendThread sock sendQ) (sendThread sock sendQ)
(recvThread sock recvQ) (recvThread sock recvQ)