diff --git a/basis/concurrency/distributed/distributed.factor b/basis/concurrency/distributed/distributed.factor index 4da079e812..5e2f1bb6d1 100755 --- a/basis/concurrency/distributed/distributed.factor +++ b/basis/concurrency/distributed/distributed.factor @@ -37,7 +37,7 @@ M: remote-process send ( message thread -- ) send-remote-message ; M: thread (serialize) ( obj -- ) - thread-id local-node get-global + id>> local-node get-global (serialize) ; : stop-node ( node -- )