1 USING: concurrency.futures kernel tools.test threads ;
\r
2 IN: concurrency.futures.tests
\r
5 [ 50 ] future ?future
\r
9 [ "this should propogate" throw ] future ?future
\r
13 [ "this should not propogate" throw ] future drop
\r
16 ! Race condition with futures
\r
19 dup ?future swap ?future
\r
24 [ 3 yield ] future ?future
\r