]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/compression/zlib/zlib-tests.factor
more test IN: cleanup.
[factor.git] / basis / compression / zlib / zlib-tests.factor
index 034f71c35b71471594979170bf5b71384cf1ab76..8bb008b2aa3cf4ce85ca2adc4078af1b88350d8d 100644 (file)
@@ -2,10 +2,7 @@
 ! See http://factorcode.org/license.txt for BSD license.
 USING: accessors kernel tools.test compression.zlib classes ;
 QUALIFIED-WITH: compression.zlib.ffi ffi
-IN: compression.zlib.tests
 
-: compress-me ( -- byte-array ) B{ 1 2 3 4 5 } ;
-
-{ t } [ compress-me [ compress uncompress ] keep = ] unit-test
+{ t } [ B{ 1 2 3 4 5 } [ compress uncompress ] keep = ] unit-test
 
 [ ffi:Z_DATA_ERROR zlib-error-message ] [ string>> "data error" = ] must-fail-with