USING: io io.servers.connection io.encodings.ascii threads accessors ; IN: echo-server : handle-echo-client ( -- ) [ print yield ] each-line ; : ( -- threaded-server ) ascii "echo-server" >>name 3333 >>insecure [ handle-echo-client ] >>handler ; : start-echo-server ( -- threaded-server ) [ start-server ] in-thread ;