2018-02-15 10:14:56 -05:00
|
|
|
USING: kernel sorting.bubble tools.test ;
|
2014-11-29 21:18:59 -05:00
|
|
|
|
|
|
|
|
{ { } } [ { } dup natural-bubble-sort! ] unit-test
|
|
|
|
|
{ { 1 } } [ { 1 } dup natural-bubble-sort! ] unit-test
|
|
|
|
|
{ { 1 2 3 4 5 } } [ { 1 4 2 5 3 } dup natural-bubble-sort! ] unit-test
|
