Chat server: Difference between revisions

m
(→‎{{header|Racket}}: Undo "improvements"; the code was written in a very specific way for a very specific reason, thankyouverymuch.)
Line 1,368:
(thread (client i o)) (set! outs (cons o outs)) (chat-server listener))
 
(void (thread ( λ() (chat-server (tcp-listen 12321)))))
((client (current-input-port) (current-output-port)))
</lang>