syndicate-lang
/
minimart-2014
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Increase TCP listen connection backlog to 128, to avoid TCP timeouts

This commit is contained in:
Tony Garnock-Jones 2015-03-18 19:04:46 -04:00
parent d031b60995
commit 7858b3aee1
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
minimart/drivers/tcp.rkt
View File

@ -89,7 +89,7 @@
(define (spawn-tcp-listener server-addr)
(match-define (tcp-listener port) server-addr)
(define listener (tcp:tcp-listen port 4 #t))
(define listener (tcp:tcp-listen port 128 #t))
(define control-ch (make-channel))
(thread (lambda () (tcp-listener-thread control-ch listener server-addr)))
(spawn tcp-listener-behavior