adding thread name for net clients

This commit is contained in:
Alex Shinn 2012-05-13 21:25:05 +09:00
parent a43cd05711
commit 1e49c0917f

View file

@ -57,5 +57,6 @@
(lambda () (lambda ()
(set! requests (+ requests 1)) (set! requests (+ requests 1))
(run sock addr count) (run sock addr count)
(set! requests (- requests 1))))) (set! requests (- requests 1)))
"net-client"))
(serve (+ 1 count)))))))))) (serve (+ 1 count))))))))))