steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

concurrency.distributed-docs: shorten some sample code

factor-shell
Alexander Iljin 2018-01-05 01:00:15 +03:00 committed by John Benediktsson
parent 620ab30ed7
commit 6bffbf4318
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
basis/concurrency/distributed/distributed-docs.factor
View File

@ -14,13 +14,13 @@ ARTICLE: "concurrency.distributed.example" "Distributed Concurrency Example"
"The code to run the server is:" "The code to run the server is:"
{ $code { $code
"USING: io.servers ;" "USING: io.servers ;"
"9000 local-server <node-server> start-server drop" "9000 local-server start-node"
} }
"The code to start the thread is:" "The code to start the thread is:"
{ $code { $code
"USING: concurrency.messaging threads ;" "USING: concurrency.messaging threads ;"
": log-message ( -- ) receive . flush log-message ;" ": log-message ( -- ) receive . flush log-message ;"
"[ log-message ] \"logger\" spawn dup name>> register-remote-thread" "[ log-message ] \"logger\" [ spawn ] keep register-remote-thread"
} }
"This spawns a thread that waits for the messages and prints them. It registers " "This spawns a thread that waits for the messages and prints them. It registers "
"the thread as remotely accessible with " { $link register-remote-thread } "." "the thread as remotely accessible with " { $link register-remote-thread } "."