diff options
author | Piotr Szarmanski | 2023-08-05 22:57:30 +0200 |
---|---|---|
committer | Piotr Szarmanski | 2023-08-05 22:57:30 +0200 |
commit | da0e1aa69defa7cbc87209966c751918f523f1fb (patch) | |
tree | ba1796f8500d314d93e46874e910492bf83ff4a2 /tests/backend-tests.lisp | |
parent | a5e2232edc0415dc16643aaeaafe91bdb1d18b59 (diff) |
Encoder refactor, new tests and proper non-file stream handling
Diffstat (limited to 'tests/backend-tests.lisp')
-rw-r--r-- | tests/backend-tests.lisp | 9 |
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 |