From f3a96257c7fc3594a1ec2cde37c248730a174e6f Mon Sep 17 00:00:00 2001
From: Jan-Erik Rediger <janerik@fnordig.de>
Date: Sat, 1 Jun 2024 15:44:54 +0200
Subject: [PATCH] http: pass on options

---
 net/http/server.ha | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/net/http/server.ha b/net/http/server.ha
index 44e76ac..42e21ac 100644
--- a/net/http/server.ha
+++ b/net/http/server.ha
@@ -1,6 +1,7 @@
 use net;
 use net::ip;
 use net::tcp;
+use net::tcp::{listen_option};
 
 export type server = struct {
 	socket: net::socket,
@@ -11,9 +12,9 @@ export type server_request = struct {
 	request: request,
 };
 
-export fn listen(ip: ip::addr, port: u16) (*server | net::error) = {
+export fn listen(ip: ip::addr, port: u16, options: listen_option...) (*server | net::error) = {
 	return alloc(server {
-		socket = tcp::listen(ip, port)?,
+		socket = tcp::listen(ip, port, options...)?,
 	});
 };