pack: add test for M\ object >n-byte-array.

diff --git a/basis/pack/pack-tests.factor b/basis/pack/pack-tests.factor
index f37d906675f8da1f8573e954dc9923a9a805835f..cf31e125856174c34509cba699636b0793dcd557 100644 (file)
--- a/basis/pack/pack-tests.factor
+++ b/basis/pack/pack-tests.factor
@@ -1,5 +1,5 @@
-USING: io io.streams.string kernel namespaces make
-pack strings tools.test pack.private ;
+USING: alien.c-types io io.streams.string kernel make namespaces
+pack pack.private strings tools.test ;
 IN: pack.tests
 
 { B{ 1 0 2 0 0 3 0 0 0 4 0 0 0 0 0 0 0 5 } } [
@@ -58,3 +58,5 @@ IN: pack.tests
 { "cccc" } [ "4c" expand-pack-format ] unit-test
 { "cccccccccccc" } [ "12c" expand-pack-format ] unit-test
 { "iccqqq" } [ "1i2c3q" expand-pack-format ] unit-test
+
+{ B{ 1 0 0 0 } } [ 1 int32_t >n-byte-array ] unit-test