simple-client ( -- )

Vocabulary

benchmark.sockets

Inputs

None

Outputs

None

Definition

USING: concurrency.count-downs debugger io io.encodings.ascii
io.sockets kernel math namespaces ;

IN: benchmark.sockets

: simple-client ( -- )
    [
        server-addr ascii [
            98 write1 flush number-of-requests
            [ 97 dup write1 flush read1 assert= ] times
        ] with-client
    ] try counter get count-down ;