From 50d27b7cd9bdcd6e86c4afcfd6eef8436b0ceba5 Mon Sep 17 00:00:00 2001
From: tali <iitalics@gmail.com>
Date: Fri, 2 Feb 2024 11:53:03 -0500
Subject: [PATCH] remove redundant setsocketopt

---
 lib/server/server.ml | 2 --
 1 file changed, 2 deletions(-)

diff --git a/lib/server/server.ml b/lib/server/server.ml
index cb44567..0dd63e9 100644
--- a/lib/server/server.ml
+++ b/lib/server/server.ml
@@ -19,8 +19,6 @@ let bind_server
       ~(listen_backlog : int)
   : fd Lwt.t =
   let fd = Lwt_unix.socket PF_INET SOCK_STREAM 0 in
-  Lwt_unix.setsockopt fd SO_KEEPALIVE false;
-  Lwt_unix.setsockopt fd SO_REUSEPORT false;
   let srv_adr = Unix.ADDR_INET (Unix.inet_addr_any, port) in
   let* () = Lwt_unix.bind fd srv_adr in
   Lwt_unix.listen fd listen_backlog;