|
USING: vectors concurrency.promises kernel threads sequences
|
|
tools.test ;
|
|
IN: concurrency.promises.tests
|
|
|
|
[ V{ 50 50 50 } ] [
|
|
0 <vector>
|
|
<promise>
|
|
[ ?promise swap push ] in-thread
|
|
[ ?promise swap push ] in-thread
|
|
[ ?promise swap push ] in-thread
|
|
50 swap fulfill
|
|
] unit-test
|