diff options
author | Vivien Kraus <vivien@planete-kraus.eu> | 2020-01-01 00:00:00 +0100 |
---|---|---|
committer | Vivien Kraus <vivien@planete-kraus.eu> | 2021-06-05 16:11:10 +0200 |
commit | 1a5e600b5c0ec3730fd01ec97e81d609f981af45 (patch) | |
tree | a27e3c29634f690da73194a7086b8bbc4c1f4ce8 /tests/hash-ok.scm | |
parent | f8aefcf31ab49c063578190ee7f4a2721e5dc035 (diff) |
Add a hash function
Diffstat (limited to 'tests/hash-ok.scm')
-rw-r--r-- | tests/hash-ok.scm | 11 |
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))))) |