wait-for-mailbox ( mailbox timeout -- )

Vocabulary

concurrency.mailboxes

Inputs

mailbox	an object
timeout	an object

Outputs

None

Definition

USING: accessors concurrency.conditions kernel ;

IN: concurrency.mailboxes

: wait-for-mailbox ( mailbox timeout -- )
    [ threads>> ] dip "mailbox" wait ; inline