mailbox
Mailboxes

Next:

<mailbox> ( -- mailbox )

Vocabulary
concurrency.mailboxes

Definition

USING: dlists ;

IN: concurrency.mailboxes

TUPLE: mailbox
    { threads dlist initial: DL{ } }
    { data dlist initial: DL{ } } ;

Methods

USING: concurrency.mailboxes concurrency.mailboxes.private
threads ;

M: mailbox mailbox-put (mailbox-put) yield ;


USING: concurrency.mailboxes concurrency.mailboxes.private
threads ;

M: mailbox send-linked-error (mailbox-put) ;