From 7ad6d342122cff0ffe3ef9738cbcd259cdd490fc Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Tue, 9 Dec 2008 21:07:28 -0600 Subject: [PATCH] Fix byte-arrays tests --- core/byte-arrays/byte-arrays-tests.factor | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/core/byte-arrays/byte-arrays-tests.factor b/core/byte-arrays/byte-arrays-tests.factor index 07b82f6111..edaea108a1 100644 --- a/core/byte-arrays/byte-arrays-tests.factor +++ b/core/byte-arrays/byte-arrays-tests.factor @@ -1,7 +1,10 @@ IN: byte-arrays.tests -USING: tools.test byte-arrays ; +USING: tools.test byte-arrays sequences kernel ; -[ B{ 1 2 3 0 0 0 } ] [ 6 B{ 1 2 3 } resize-byte-array ] unit-test +[ 6 B{ 1 2 3 } ] [ + 6 B{ 1 2 3 } resize-byte-array + [ length ] [ 3 head ] bi +] unit-test [ B{ 1 2 } ] [ 2 B{ 1 2 3 4 5 6 7 8 9 } resize-byte-array ] unit-test