From 590586e551e1d014c314b2b97390ce56908cd6b9 Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Fri, 10 Sep 2010 18:46:14 -0700 Subject: [PATCH] benchmark.sockets: yield between spawning clients so we don't backlog requests (we call accept with a limit of 128) --- extra/benchmark/sockets/sockets.factor | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/extra/benchmark/sockets/sockets.factor b/extra/benchmark/sockets/sockets.factor index 4d4430d7e2..b76d06063d 100644 --- a/extra/benchmark/sockets/sockets.factor +++ b/extra/benchmark/sockets/sockets.factor @@ -55,7 +55,7 @@ CONSTANT: number-of-requests 1000 [ server set ] [ addr>> port>> port set ] bi [ simple-server ] "Simple server" spawn drop - [ [ simple-client ] "Simple client" spawn drop ] times + [ yield [ simple-client ] "Simple client" spawn drop ] times counter get await stop-server