<meeting-place> ( count -- meeting-place )


Vocabulary
benchmark.chameneos-redux

Inputs
countan object


Outputs
meeting-placean object


Definition
USING: accessors concurrency.mailboxes kernel ;

IN: benchmark.chameneos-redux

: <meeting-place> ( count -- meeting-place )
meeting-place new swap >>count <mailbox> >>mailbox ;