Anonymous user
Sorting algorithms/Sleep sort: Difference between revisions
Add Factor sleep-sort
m (→{{header|FreeBASIC}}: minor change) |
(Add Factor sleep-sort) |
||
Line 460:
end while
end if</lang>
=={{header|Factor}}==
<lang Factor>
USING: threads calendar concurrency.combinators
: sleep-sort ( seq -- ) [ dup seconds sleep . ] parallel-each ;
</lang>
Usage:
<lang Factor>
{ 1 9 2 6 3 4 5 8 7 0 } sleep-sort
</lang>
=={{header|FreeBASIC}}==
| |||