Echo server: Difference between revisions
Content added Content deleted
(→{{header|Racket}}: Fix this to match the Racket webpage example again: there's no need to have a function) |
m (→{{header|Racket}}: lambda) |
||
| Line 1,516: | Line 1,516: | ||
(let echo-server () |
(let echo-server () |
||
(define-values [I O] (tcp-accept listener)) |
(define-values [I O] (tcp-accept listener)) |
||
(thread ( |
(thread (λ() (copy-port I O) (close-output-port O))) |
||
(echo-server)) |
(echo-server)) |
||
</lang> |
</lang> |
||