Tweak
parent
d0e5c585f5
commit
c3bb6b911b
|
@ -23,10 +23,9 @@ IN: benchmark.sockets
|
|||
] with-stream ;
|
||||
|
||||
: clients ( n -- )
|
||||
dup pprint " clients: " write
|
||||
[
|
||||
dup pprint " clients: " write [
|
||||
[ simple-server ] in-thread
|
||||
100 sleep
|
||||
yield yield
|
||||
[ drop simple-client ] parallel-each
|
||||
stop-server
|
||||
yield yield
|
||||
|
|
Loading…
Reference in New Issue