summaryrefslogtreecommitdiff
path: root/tests/rfc.lisp
diff options
context:
space:
mode:
authorPiotr Szarmanski2022-12-30 20:50:05 +0100
committerPiotr Szarmanski2022-12-30 20:50:05 +0100
commit219e118a80858e05e7b9917f9d0996af70982ae4 (patch)
treed4a30ac582f98b77a79a164d40f9a7e794e1c6b4 /tests/rfc.lisp
parent618ee634557122b3b3c5012405603b28c0001d13 (diff)
parent5afc44c1082ae7088511f318aa9bd3d4b25ba3c6 (diff)
Merge branch 'no-allocate-buffers'
Diffstat (limited to 'tests/rfc.lisp')
-rw-r--r--tests/rfc.lisp3
1 files changed, 2 insertions, 1 deletions
diff --git a/tests/rfc.lisp b/tests/rfc.lisp
index 15b993e..dafa086 100644
--- a/tests/rfc.lisp
+++ b/tests/rfc.lisp
@@ -24,7 +24,8 @@
(defun test-output (block ref)
(assert (equalp block
- (base32-to-bytes-unpadded (getf *alist* (intern (bytes-to-base32-unpadded ref) :keyword))))))
+ (base32-to-bytes-unpadded (getf *alist* (intern (bytes-to-base32-unpadded ref) :keyword)))))
+ block)
(defmacro positive-test (urn content block-alist secret block-size)
`(let ((*alist* ,block-alist)