register-thread ( thread -- )

Vocabulary

threads.private

Inputs

thread

an object

Outputs

None

Definition

USING: accessors assocs kernel threads ;

IN: threads.private

: register-thread ( thread -- ) dup id>> threads set-at ;