Author: | josh |
---|---|
Mode: | factor |
Date: | Sat, 28 Feb 2009 04:53:07 |
USING: kernel threads io io.sockets io.encodings.utf8 prettyprint math concurrency.combinators ; "mud.arctic.org" 2700 <inet> utf8 <client> swap dup { [ [ [ print ] each-line ] with-input-stream ] [ [ [ write flush ] each-line ] with-output-stream ] } parallel-cleave