aboutsummaryrefslogtreecommitdiff
path: root/tests/test
diff options
context:
space:
mode:
authorHugo Hörnquist <hugo@lysator.liu.se>2022-06-23 04:56:49 +0200
committerHugo Hörnquist <hugo@lysator.liu.se>2022-06-23 04:56:49 +0200
commit6f9c6298b3b61642e4acaca6c7ad33943c9f4ab3 (patch)
tree59a6fd5c5eba65e97837c9a6e0240313a7eed098 /tests/test
parentMinor cleanup of entry-points/server. (diff)
downloadcalp-6f9c6298b3b61642e4acaca6c7ad33943c9f4ab3.tar.gz
calp-6f9c6298b3b61642e4acaca6c7ad33943c9f4ab3.tar.xz
Normalize base64 errors.
Diffstat (limited to 'tests/test')
-rw-r--r--tests/test/base64.scm4
1 files changed, 1 insertions, 3 deletions
diff --git a/tests/test/base64.scm b/tests/test/base64.scm
index 788e7093..61ac8856 100644
--- a/tests/test/base64.scm
+++ b/tests/test/base64.scm
@@ -28,14 +28,12 @@
;; Other tests
-;; TODO normalize base64 errors
-
(test-error "Invalid base64"
'decoding-error
(base64decode "@@@@"))
(test-error "To short base64"
- 'out-of-range
+ 'decoding-error
(base64decode "="))
(test-equal "AAECAw==" (bytevector->base64-string #vu8(0 1 2 3)))