import stateTVar

This commit is contained in:
Evgeny Poberezkin
2023-03-18 13:57:17 +00:00
parent 2e02ba86fd
commit 40da7e76dd
2 changed files with 2 additions and 1 deletions
+1
View File
@@ -19,6 +19,7 @@ module Simplex.FileTransfer.Agent
)
where
import Control.Concurrent.STM (stateTVar)
import Control.Logger.Simple (logError)
import Control.Monad
import Control.Monad.Except
+1 -1
View File
@@ -88,7 +88,7 @@ where
import Control.Applicative ((<|>))
import Control.Concurrent (forkIO, threadDelay)
import Control.Concurrent.Async (Async, uninterruptibleCancel)
import Control.Concurrent.STM (retry, throwSTM)
import Control.Concurrent.STM (retry, stateTVar, throwSTM)
import Control.Exception (AsyncException (..))
import Control.Logger.Simple
import Control.Monad.Except