Adjust TCP listen backlog for non-TCP-driver minimart variant, too.

2015-03-18 21:28:58 -04:00 · 2015-03-18 21:28:58 -04:00 · 04f1b54ac3
parent a18fdd959a
commit 04f1b54ac3
1 changed files with 1 additions and 1 deletions
--- a/echo-server.rkt
+++ b/echo-server.rkt
@ -58,7 +58,7 @@
 	      (transition s (connection in out))]
 	     [_ #f]))
 	 #f
-	 (sub (event (tcp-accept-evt (tcp-listen port-number 4 #t)) ?)
+	 (sub (event (tcp-accept-evt (tcp-listen port-number 128 #t)) ?)
              #:meta-level 1)))

 (define (connection in out)