2008-03-08 03:51:26 -05:00
|
|
|
USING: io.binary tools.test classes math ;
|
2008-03-01 17:00:45 -05:00
|
|
|
IN: io.binary.tests
|
2007-09-20 18:09:08 -04:00
|
|
|
|
2008-03-07 22:26:35 -05:00
|
|
|
[ B{ 0 0 4 HEX: d2 } ] [ 1234 4 >be ] unit-test
|
|
|
|
|
[ B{ HEX: d2 4 0 0 } ] [ 1234 4 >le ] unit-test
|
2007-09-20 18:09:08 -04:00
|
|
|
|
|
|
|
|
[ 1234 ] [ 1234 4 >be be> ] unit-test
|
|
|
|
|
[ 1234 ] [ 1234 4 >le le> ] unit-test
|
2008-03-08 03:51:26 -05:00
|
|
|
|
|
|
|
|
[ fixnum ] [ B{ 0 0 0 0 0 0 0 0 0 0 } be> class ] unit-test
|
