factor/library/test/binary.factor

IN: temporary
USING: io test ;

[ "\0\0\u0004\u00d2" ] [ 1234 4 >be ] unit-test
[ "\u00d2\u0004\0\0" ] [ 1234 4 >le ] unit-test

[ 1234 ] [ 1234 4 >be be> ] unit-test
[ 1234 ] [ 1234 4 >le le> ] unit-test
added binary word unit tests 2005-06-10 17:41:41 -04:00			`IN: temporary`
merged streams, stdio and files into io vocabulary 2005-06-19 17:50:35 -04:00			`USING: io test ;`
added binary word unit tests 2005-06-10 17:41:41 -04:00
			`[ "\0\0\u0004\u00d2" ] [ 1234 4 >be ] unit-test`
			`[ "\u00d2\u0004\0\0" ] [ 1234 4 >le ] unit-test`

			`[ 1234 ] [ 1234 4 >be be> ] unit-test`
			`[ 1234 ] [ 1234 4 >le le> ] unit-test`