concurrency.distributed: shorten stop-node implementation

factor-shell
Alexander Iljin 2018-01-09 02:52:21 +03:00 committed by Doug Coleman
parent b40ba26bac
commit 72ed5bf73d
1 changed files with 1 additions and 1 deletions

View File

@ -52,7 +52,7 @@ M: thread (serialize) ( obj -- )
id>> [ local-node get insecure>> ] dip <remote-thread> (serialize) ;
: stop-node ( -- )
local-node get insecure>> f swap send-remote-message ;
f local-node get insecure>> send-remote-message ;
[
H{ } clone \ registered-remote-threads set-global