factor/library/test/benchmark/sort.factor

14 lines
235 B
Factor

IN: scratchpad
USE: lists
USE: kernel
USE: math
USE: namespaces
USE: random
USE: test
USE: compiler
: sort-benchmark
[ 100000 [ 0 10000 random-int , ] times ] make-list [ > ] sort drop ; compiled
[ ] [ sort-benchmark ] unit-test