mirror of
https://github.com/simplex-chat/simplexmq.git
synced 2026-03-30 20:45:52 +00:00
reduce transaction retry back-off factor to 1.25 (31 retries) (#136)
This commit is contained in:
committed by
GitHub
parent
305bc5cb0a
commit
8ac47b9bbf
@@ -104,7 +104,7 @@ withTransaction db a = loop 100 100_000
|
||||
if tLim > t && DB.sqlError e == DB.ErrorBusy
|
||||
then do
|
||||
threadDelay t
|
||||
loop (t * 3 `div` 2) (tLim - t)
|
||||
loop (t * 5 `div` 4) (tLim - t)
|
||||
else E.throwIO e
|
||||
|
||||
instance (MonadUnliftIO m, MonadError StoreError m) => MonadAgentStore SQLiteStore m where
|
||||
|
||||
Reference in New Issue
Block a user