summaryrefslogtreecommitdiff
path: root/tests/backend-tests.lisp
diff options
context:
space:
mode:
authorPiotr Szarmanski2023-08-05 22:57:30 +0200
committerPiotr Szarmanski2023-08-05 22:57:30 +0200
commitda0e1aa69defa7cbc87209966c751918f523f1fb (patch)
treeba1796f8500d314d93e46874e910492bf83ff4a2 /tests/backend-tests.lisp
parenta5e2232edc0415dc16643aaeaafe91bdb1d18b59 (diff)
Encoder refactor, new tests and proper non-file stream handling
Diffstat (limited to 'tests/backend-tests.lisp')
-rw-r--r--tests/backend-tests.lisp9
1 files changed, 0 insertions, 9 deletions
diff --git a/tests/backend-tests.lisp b/tests/backend-tests.lisp
index dc411d5..0f60267 100644
--- a/tests/backend-tests.lisp
+++ b/tests/backend-tests.lisp
@@ -34,15 +34,6 @@
(test-hash-backend (make-octets 16834 :element 5) 32kib)
(test-hash-backend (make-octets 96000 :element 5) 32kib))
-(defun make-temporary-dir ()
- (let* ((tmpdir (uiop:temporary-directory))
- (tmp-tmpdir (make-pathname :directory (serapeum:append1
- (pathname-directory tmpdir)
- (ironclad:byte-array-to-hex-string (ironclad:random-data 10)))
- :defaults tmpdir)))
- (ensure-directories-exist tmp-tmpdir)
- tmp-tmpdir))
-
(defmacro test-file-backend (array &optional (secret null-secret))
`(let ((tmpdir (make-temporary-dir)))
(unwind-protect