From 4596856d775ee6898806f53c1b4cfba25c231678 Mon Sep 17 00:00:00 2001 From: Alex Shinn Date: Wed, 12 Feb 2014 08:29:16 +0900 Subject: [PATCH] Explicitly flushing output in run-net-server. --- lib/chibi/net/server.scm | 1 + 1 file changed, 1 insertion(+) diff --git a/lib/chibi/net/server.scm b/lib/chibi/net/server.scm index 3f4df3a3..48bce643 100644 --- a/lib/chibi/net/server.scm +++ b/lib/chibi/net/server.scm @@ -48,6 +48,7 @@ (close-output-port (cdr ports)) (close-file-descriptor sock))) (handler (car ports) (cdr ports) sock addr) + (flush-output (cdr ports)) (close-input-port (car ports)) (close-output-port (cdr ports)) (close-file-descriptor sock)))