associate-thread ( walker -- )

Vocabulary

tools.walker

Inputs

walker

an object

Outputs

None

Definition

USING: accessors concurrency.messaging kernel threads ;

IN: tools.walker

: associate-thread ( walker -- )
    walker-thread tset
    [ f walker-thread tget send-synchronous drop ] self
    exit-handler<< ;