From 931242f927fca1ab372d6a0e4bc27653edeec853 Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Mon, 17 Aug 1998 12:03:58 +0000
Subject: [PATCH] [project @ 1998-08-17 12:03:58 by simonm] add (disabled)
SO_REUSEPORT socket option.
---
ghc/lib/misc/SocketPrim.lhs | 2 ++
1 file changed, 2 insertions(+)
diff --git a/ghc/lib/misc/SocketPrim.lhs b/ghc/lib/misc/SocketPrim.lhs
index d7facdba0bf1..2cdcc67fba45 100644
--- a/ghc/lib/misc/SocketPrim.lhs
+++ b/ghc/lib/misc/SocketPrim.lhs
@@ -545,6 +545,7 @@ data SocketOption
| NoDelay {- TCP_NODELAY -}
-- | Linger {- SO_LINGER -}
#if 0
+ | ReusePort {- SO_REUSEPORT -} -- BSD only?
| RecvLowWater {- SO_RCVLOWAT -}
| SendLowWater {- SO_SNDLOWAT -}
| RecvTimeOut {- SO_RCVTIMEO -}
@@ -568,6 +569,7 @@ packSocketOption so =
MaxSegment -> ``TCP_MAXSEG''
NoDelay -> ``TCP_NODELAY''
#if 0
+ ReusePort -> ``SO_REUSEPORT'' -- BSD only?
RecvLowWater -> ``SO_RCVLOWAT''
SendLowWater -> ``SO_SNDLOWAT''
RecvTimeOut -> ``SO_RCVTIMEO''
--
GitLab