13 lines
310 B
Factor
13 lines
310 B
Factor
|
IN: concurrency.promises.tests
|
||
|
|
USING: vectors concurrency.promises kernel threads sequences
|
||
|
|
tools.test ;
|
||
|
|
|
||
|
|
[ 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
|