Test output for message-digest [ok]
Testing time: 1s
/home/mario/local/chicken-4.8.0.3/bin/csi -script run.scm < /dev/null
-- testing Message Digest ----------------------------------------------------
-- testing Chunk Read ----------------------------------------------------
First chunk type ................................................. [ PASS]
First chunk size ................................................. [ PASS]
No more chunk .................................................... [ PASS]
3 tests completed in 0.001 seconds.
3 out of 3 (100%) tests passed.
-- done testing Chunk Read -----------------------------------------------
-- testing Make Primitive ------------------------------------------------
(message-digest-primitive? mdp) .................................. [ PASS]
(message-digest-primitive-context-info mdp) ...................... [ PASS]
(message-digest-primitive-digest-length mdp) ..................... [ PASS]
(message-digest-primitive-init mdp) .............................. [ PASS]
(message-digest-primitive-update mdp) ............................ [ PASS]
(message-digest-primitive-final mdp) ............................. [ PASS]
(message-digest-primitive-name mdp) .............................. [ PASS]
7 tests completed in 0.003 seconds.
7 out of 7 (100%) tests passed.
-- done testing Make Primitive -------------------------------------------
-- testing Proper Phase Arguments (Def Alloc) ----------------------------
(message-digest? md) ............................................. [ PASS]
(message-digest-update-string md simple-src) ..................... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
3 tests completed in 0.0 seconds.
3 out of 3 (100%) tests passed.
-- done testing Proper Phase Arguments (Def Alloc) -----------------------
-- testing Proper Phase Arguments (Own Alloc) ----------------------------
(message-digest? md) ............................................. [ PASS]
(message-digest-update-string md simple-src) ..................... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
3 tests completed in 0.0 seconds.
3 out of 3 (100%) tests passed.
-- done testing Proper Phase Arguments (Own Alloc) -----------------------
-- testing u8vector Source -----------------------------------------------
(message-digest-update-u8vector md (u8vector 1 2 3 4 5)) ......... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing u8vector Source ------------------------------------------
-- testing u8 Source -----------------------------------------------------
(message-digest-update-u8 md 162) ................................ [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing u8 Source ------------------------------------------------
-- testing u16-le Source -------------------------------------------------
(message-digest-update-u16-le md 41650) .......................... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing u16-le Source --------------------------------------------
-- testing u32-be Source -------------------------------------------------
(message-digest-update-u32-be md 1073741823) ..................... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.001 seconds.
2 out of 2 (100%) tests passed.
-- done testing u32-be Source --------------------------------------------
-- testing u32-be Source -------------------------------------------------
(message-digest-update-u32-be md 2729624274) ..................... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing u32-be Source --------------------------------------------
-- testing char-u8 Source ------------------------------------------------
(message-digest-update-char-u8 md #\space) ....................... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing char-u8 Source -------------------------------------------
-- testing char-be Source ------------------------------------------------
(message-digest-update-char-be md #\x3bb) ........................ [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing char-be Source -------------------------------------------
-- testing char-le Source ------------------------------------------------
(message-digest-update-char-le md #\x3bb) ........................ [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.001 seconds.
2 out of 2 (100%) tests passed.
-- done testing char-le Source -------------------------------------------
-- testing Procedure Source ----------------------------------------------
(message-digest-update-procedure md just-once) ................... [ PASS]
(finalize-message-digest md) ..................................... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing Procedure Source -----------------------------------------
-- testing Port ----------------------------------------------------------
(output-port? port) .............................................. [ PASS]
(get-output-digest port 'hex) .................................... [ PASS]
(port-closed? port) .............................................. [ PASS]
3 tests completed in 0.0 seconds.
3 out of 3 (100%) tests passed.
-- done testing Port -----------------------------------------------------
14 subgroups completed in 0.073 seconds.
14 out of 14 (100%) subgroups passed.
-- done testing Message Digest -----------------------------------------------