1 ! Copyright (C) 2005 Chris Double. All Rights Reserved.
2 ! See http://factorcode.org/license.txt for BSD license.
4 USING: kernel tools.test math channels channels.private
5 sequences threads sorting ;
10 [ from swap push ] in-thread
16 [ 20 swap to ] in-thread
22 [ from swap push ] in-thread
23 [ from swap push ] in-thread
24 [ from swap push ] in-thread
25 [ from swap push ] in-thread
35 [ 4 swap to ] in-thread
36 [ 2 swap to ] in-thread
37 [ 1 swap to ] in-thread
38 [ 9 swap to ] in-thread