X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Fcompress.lisp;h=9e73326f469636cc9356bff26d1efe00a79e8583;hb=c4533c02d3f2ebd53178c93de2dee09ca39fe0e7;hp=7cf3cfa26f499f72de46f47fb6f1abc60079095d;hpb=b8e666e0f483efdec2f13eb5e1cdd0b06f700191;p=uffi.git

diff --git a/tests/compress.lisp b/tests/compress.lisp
index 7cf3cfa..9e73326 100644
--- a/tests/compress.lisp
+++ b/tests/compress.lisp
@@ -9,7 +9,7 @@
 ;;;;
 ;;;; $Id$
 ;;;;
-;;;; This file, part of UFFI, is Copyright (c) 2002-2003 by Kevin M. Rosenberg
+;;;; This file, part of UFFI, is Copyright (c) 2002-2005 by Kevin M. Rosenberg
 ;;;;
 ;;;; *************************************************************************
 
@@ -72,11 +72,11 @@
 	    (uffi:free-foreign-object destlen)
 	    (uffi:free-foreign-object dest)))))))
 
-(deftest compress.1 (compress "")
+(deftest :compress.1 (compress "")
   #(120 156 3 0 0 0 0 1) 8)
-(deftest compress.2  (compress "test")
+(deftest :compress.2  (compress "test")
   #(120 156 43 73 45 46 1 0 4 93 1 193) 12)
-(deftest compress.3 (compress "test2")
+(deftest :compress.3 (compress "test2")
   #(120 156 43 73 45 46 49 2 0 6 80 1 243) 13)
 
 (defun compress-uncompress (str)
@@ -87,6 +87,6 @@
       uncompressed)))
 
 
-(deftest uncompress.1 "" "")
-(deftest uncompress.2 "test" "test")
-(deftest uncompress.3 "test2" "test2")
+(deftest :uncompress.1 "" "")
+(deftest :uncompress.2 "test" "test")
+(deftest :uncompress.3 "test2" "test2")