From 6f9c6298b3b61642e4acaca6c7ad33943c9f4ab3 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= Date: Thu, 23 Jun 2022 04:56:49 +0200 Subject: Normalize base64 errors. --- tests/test/base64.scm | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'tests/test') 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))) -- cgit v1.2.3