projects
/
uffi.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
r10564: fix :modules in def-function
[uffi.git]
/
tests
/
compress.lisp
diff --git
a/tests/compress.lisp
b/tests/compress.lisp
index 7cf3cfa26f499f72de46f47fb6f1abc60079095d..738e16264ffdba131bd7b728a01cb233a4cae3cd 100644
(file)
--- a/
tests/compress.lisp
+++ b/
tests/compress.lisp
@@
-72,11
+72,11
@@
(uffi:free-foreign-object destlen)
(uffi:free-foreign-object dest)))))))
(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)
#(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)
#(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)
#(120 156 43 73 45 46 49 2 0 6 80 1 243) 13)
(defun compress-uncompress (str)
@@
-87,6
+87,6
@@
uncompressed)))
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")