summaryrefslogtreecommitdiff
path: root/tests/hash-ok.scm
diff options
context:
space:
mode:
Diffstat (limited to 'tests/hash-ok.scm')
-rw-r--r--tests/hash-ok.scm11
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/hash-ok.scm b/tests/hash-ok.scm
new file mode 100644
index 0000000..26384f8
--- /dev/null
+++ b/tests/hash-ok.scm
@@ -0,0 +1,11 @@
+(use-modules
+ (webid-oidc testing)
+ ((webid-oidc stubs) #:prefix stubs:)
+ (rnrs bytevectors))
+
+(with-test-environment
+ "hash-ok"
+ (lambda ()
+ (let ((hashed (stubs:hash 'SHA-256 "hello :)")))
+ (unless (string? hashed)
+ (exit 1)))))