source: project/release/4/sha1/trunk/tests/run.scm @ 15609

Last change on this file since 15609 was 15609, checked in by Kon Lovett, 11 years ago

Initial save.

File size: 400 bytes
Line 
1;;;; sha1-test.scm
2
3(module sha1-test ()
4  (import scheme chicken
5          test
6          (prefix sha1 sha1:))
7  (require-library test sha1)
8
9(test-group "SHA 1"
10  (test "Short" "a9993e364706816aba3e25717850c26c9cd0d89d" (sha1:digest "abc"))
11  (test "Longer" "84983e441c3bd26ebaae4aa1f95129e5e54670f1" (sha1:digest "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq"))
12)
13
14) ;module sha1-test
Note: See TracBrowser for help on using the repository browser.