endian: replaces io.binary and io.binary.fast.

[factor.git] / basis / math / bitwise / bitwise-tests.factor

diff --git a/basis/math/bitwise/bitwise-tests.factor b/basis/math/bitwise/bitwise-tests.factor
index 7613b478760e80e4bc9ee2d6ba548537e3b83c65..79567c725c406d85fe117c91fc36a6f3c6b3d000 100644 (file)
--- a/basis/math/bitwise/bitwise-tests.factor
+++ b/basis/math/bitwise/bitwise-tests.factor
@@ -116,3 +116,7 @@ SPECIALIZED-ARRAY: uint-4
 { 3 } [ 0b101 bit-length ] unit-test
 { 3 } [ 0b110 bit-length ] unit-test
 { 3 } [ 0b111 bit-length ] unit-test
+
+{ 0x56780000 0x12340000 } [ 0x1234000056780000 d>w/w ] unit-test
+{ 0x5678 0x1234 } [ 0x12345678 w>h/h ] unit-test
+{ 0x34 0x12 } [ 0x1234 h>b/b ] unit-test