From 298666380f598d32d709f963153acbb50d51afac Mon Sep 17 00:00:00 2001 From: Evgeny Date: Mon, 20 Jan 2025 16:32:42 +0000 Subject: [PATCH] servers: handle accept error ECONNABORTED (#1437) --- src/Simplex/Messaging/Transport/Server.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Simplex/Messaging/Transport/Server.hs b/src/Simplex/Messaging/Transport/Server.hs index c328dd6e5..1f0d82195 100644 --- a/src/Simplex/Messaging/Transport/Server.hs +++ b/src/Simplex/Messaging/Transport/Server.hs @@ -159,7 +159,7 @@ safeAccept sock = | otherwise -> logError err >> E.throwIO e where retryAccept = maybe False ((`elem` again) . Errno) errno - again = [eAGAIN, eNETDOWN, ePROTO, eNOPROTOOPT, eHOSTDOWN, eNONET, eHOSTUNREACH, eOPNOTSUPP, eNETUNREACH] + again = [eCONNABORTED, eAGAIN, eNETDOWN, ePROTO, eNOPROTOOPT, eHOSTDOWN, eNONET, eHOSTUNREACH, eOPNOTSUPP, eNETUNREACH] err = "socket accept error: " <> tshow e <> maybe "" ((", errno=" <>) . tshow) errno errno = ioe_errno e