RosettaCodeData/Task/Distributed-programming/Factor/distributed-programming-1.factor

6 lines
332 B
Factor
Raw Permalink Normal View History

2014-01-17 05:32:22 +00:00
USING: concurrency.distributed concurrency.messaging threads io.sockets io.servers ;
QUALIFIED: concurrency.messaging
: prettyprint-message ( -- ) concurrency.messaging:receive . flush prettyprint-message ;
[ prettyprint-message ] "logger" spawn dup name>> register-remote-thread
"127.0.0.1" 9000 <inet4> <node-server> start-server