factor/basis/shuffle/shuffle-tests.factor

USING: shuffle tools.test ;
IN: shuffle.tests

{ 1 2 3 4 } [ 3 4 1 2 2swap ] unit-test

{ 4 2 3 } [ 1 2 3 4 shuffle( a b c d -- d b c ) ] unit-test

{ 2 3 4 1 } [ 1 2 3 4 roll ] unit-test
{ 1 2 3 4 } [ 2 3 4 1 -roll ] unit-test
ugh 2008-07-08 13:44:25 -04:00			`USING: shuffle tools.test ;`
exile roll and -roll to basis/shuffle and mark them deprecated 2009-10-30 18:11:45 -04:00			`IN: shuffle.tests`
Oops 2008-07-08 13:34:52 -04:00
factor: Retrying on the unit tests. Also normalize some syntax with FUNCTION:. 2015-07-02 20:28:17 -04:00			`{ 1 2 3 4 } [ 3 4 1 2 2swap ] unit-test`
shuffle( -- ) arbitrary stack shuffling word 2009-02-09 12:40:05 -05:00
factor: Retrying on the unit tests. Also normalize some syntax with FUNCTION:. 2015-07-02 20:28:17 -04:00			`{ 4 2 3 } [ 1 2 3 4 shuffle( a b c d -- d b c ) ] unit-test`
exile roll and -roll to basis/shuffle and mark them deprecated 2009-10-30 18:11:45 -04:00
factor: Retrying on the unit tests. Also normalize some syntax with FUNCTION:. 2015-07-02 20:28:17 -04:00			`{ 2 3 4 1 } [ 1 2 3 4 roll ] unit-test`
			`{ 1 2 3 4 } [ 2 3 4 1 -roll ] unit-test`