From 67fa873d9cd845ba87a96703cb44029583fbc226 Mon Sep 17 00:00:00 2001
From: Eduardo Cavazos <dharmatech@finkelstein.stackeffects.info>
Date: Thu, 14 Feb 2008 05:21:02 -0600
Subject: [PATCH] benchmark.sockets: run more clients

---
 extra/benchmark/sockets/sockets.factor | 15 ++++++++-------
 1 file changed, 8 insertions(+), 7 deletions(-)

diff --git a/extra/benchmark/sockets/sockets.factor b/extra/benchmark/sockets/sockets.factor
index e8efc11c32..f19a2127a5 100755
--- a/extra/benchmark/sockets/sockets.factor
+++ b/extra/benchmark/sockets/sockets.factor
@@ -22,7 +22,7 @@ IN: benchmark.sockets
         CHAR: x write1
     ] with-stream ;
 
-: socket-benchmark ( n -- )
+: clients ( n -- )
     dup pprint " clients: " write
         [
         [ simple-server ] in-thread
@@ -33,11 +33,12 @@ IN: benchmark.sockets
     ] time ;
 
 : socket-benchmarks
-    10 socket-benchmark
-    20 socket-benchmark
-    40 socket-benchmark
-    80 socket-benchmark
-    160 socket-benchmark
-    320 socket-benchmark ;
+    10 clients
+    20 clients
+    40 clients
+    80 clients
+    160 clients
+    320 clients
+    640 clients ;
 
 MAIN: socket-benchmarks