check that the length of checksum-lines is correct for md

db4
Doug Coleman 2009-10-01 13:48:28 -05:00
parent be110afe27
commit 5c972d9679
1 changed files with 6 additions and 0 deletions
basis/checksums/md5

View File

@ -33,3 +33,9 @@ IN: checksums.md5.tests
<md5-state> "asdf" binary <byte-reader> add-checksum-stream
[ get-checksum ] [ get-checksum ] bi =
] unit-test
[
t
] [
{ "abcd" "efg" } md5 checksum-lines length 16 =
] unit-test