source: project/release/4/sha2/trunk/tests/run.scm @ 15618

Last change on this file since 15618 was 15618, checked in by Kon Lovett, 10 years ago

Initial save.

File size: 1.1 KB
Line 
1;;;; sha2-test.scm
2
3(use test)
4(use sha2)
5
6(test-group "SHA2"
7
8  (test-group "Strings 256"
9      (test "ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad" (sha256:digest "abc"))
10      (test "248d6a61d20638b8e5c026930c3e6039a33ce45964ff2167f6ecedd419db06c1" (sha256:digest "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq"))
11  )
12
13  (test-group "Strings 384"
14      (test "cb00753f45a35e8bb5a03d699ac65007272c32ab0eded1631a8b605a43ff5bed8086072ba1e7cc2358baeca134c825a7" (sha384:digest "abc"))
15      (test "3391fdddfc8dc7393707a65b1b4709397cf8b1d162af05abfe8f450de5f36bc6b0455a8520bc4e6f5fe95b1fe3c8452b" (sha384:digest "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq"))
16  )
17
18  (test-group "Strings 512"
19      (test "ddaf35a193617abacc417349ae20413112e6fa4e89a97ea20a9eeee64b55d39a2192992a274fc1a836ba3c23a3feebbd454d4423643ce80e2a9ac94fa54ca49f" (sha512:digest "abc"))
20      (test "204a8fc6dda82f0a0ced7beb8e08a41657c16ef468b228a8279be331a703c33596fd15c13b1b07f9aa1d3bea57789ca031ad85c7a71dd70354ec631238ca3445" (sha512:digest "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq"))
21  )
22)
Note: See TracBrowser for help on using the repository browser.