Skip to content

Commit 412cb41

Browse files
Merge pull request #599 from christopherm99/mac-timeout
Fix `UserTimeout` on macos
2 parents ca0a569 + 9a29dde commit 412cb41

File tree

1 file changed

+2
-0
lines changed

1 file changed

+2
-0
lines changed

Network/Socket/Options.hsc

Lines changed: 2 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -299,6 +299,8 @@ pattern NoDelay = SockOpt (-1) (-1)
299299
pattern UserTimeout :: SocketOption
300300
#ifdef TCP_USER_TIMEOUT
301301
pattern UserTimeout = SockOpt (#const IPPROTO_TCP) (#const TCP_USER_TIMEOUT)
302+
#elif defined(TCP_CONNECTIONTIMEOUT)
303+
pattern UserTimeout = SockOpt (#const IPPROTO_TCP) (#const TCP_CONNECTIONTIMEOUT)
302304
#else
303305
pattern UserTimeout = SockOpt (-1) (-1)
304306
#endif

0 commit comments

Comments
 (0)