Test output for levenshtein [ok]
Testing time: 0s
/home/mario/local/chicken-4.8.0.3/bin/csi -script run.scm < /dev/null
-- testing Byte Strings ------------------------------------------------------
-- testing Byte ----------------------------------------------------------
-- testing Simple Strings --------------------------------------------
(levenshtein-distance/byte "adresse" "address") .............. [ PASS]
(levenshtein-distance/byte "adresse" "addressee") ............ [ PASS]
(levenshtein-distance/byte "gambol" "gumbo") ................. [ PASS]
(levenshtein-distance/byte "gumbo" "gambol") ................. [ PASS]
(levenshtein-distance/byte "gumbo" "bumble") ................. [ PASS]
(levenshtein-distance/byte "a" "abcde") ...................... [ PASS]
(levenshtein-distance/byte "abcde" "a") ...................... [ PASS]
7 tests completed in 0.002 seconds.
7 out of 7 (100%) tests passed.
-- done testing Simple Strings ---------------------------------------
-- testing Simple Blobs ----------------------------------------------
(levenshtein-distance/byte '#${01020304} '#${01030204}) ...... [ PASS]
(levenshtein-distance/byte '#${01020304} '#${01030205}) ...... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing Simple Blobs -----------------------------------------
2 subgroups completed in 0.002 seconds.
2 out of 2 (100%) subgroups passed.
-- done testing Byte -----------------------------------------------------
-- testing Byte w/ Transpose ---------------------------------------------
-- testing Simple Strings --------------------------------------------
(levenshtein-distance/transpose-byte "adresse" "address") .... [ PASS]
(levenshtein-distance/transpose-byte "adresse" "addressee") .. [ PASS]
(levenshtein-distance/transpose-byte "gambol" "gumbo") ....... [ PASS]
(levenshtein-distance/transpose-byte "gumbo" "gambol") ....... [ PASS]
(levenshtein-distance/transpose-byte "gumbo" "bumble") ....... [ PASS]
(levenshtein-distance/transpose-byte "a" "abcde") ............ [ PASS]
(levenshtein-distance/transpose-byte "abcde" "a") ............ [ PASS]
7 tests completed in 0.001 seconds.
7 out of 7 (100%) tests passed.
-- done testing Simple Strings ---------------------------------------
-- testing Simple Blobs ----------------------------------------------
(levenshtein-distance/transpose-byte '#${01020304} '#${01030204}) [ PASS]
(levenshtein-distance/transpose-byte '#${01020304} '#${01030205}) [ PASS]
2 tests completed in 0.001 seconds.
2 out of 2 (100%) tests passed.
-- done testing Simple Blobs -----------------------------------------
2 subgroups completed in 0.003 seconds.
2 out of 2 (100%) subgroups passed.
-- done testing Byte w/ Transpose ----------------------------------------
2 subgroups completed in 0.019 seconds.
2 out of 2 (100%) subgroups passed.
-- done testing Byte Strings -------------------------------------------------
-- testing Levenshtein Operators ---------------------------------------------
-- testing Operations ----------------------------------------------------
Insert ref ....................................................... [ PASS]
Transpose ref .................................................... [ PASS]
Make foo ......................................................... [ PASS]
Set! foo ......................................................... [ PASS]
Ref foo .......................................................... [ PASS]
Delete! foo ...................................................... [ PASS]
Delete clone = ................................................... [ PASS]
7 tests completed in 0.0 seconds.
7 out of 7 (100%) tests passed.
-- done testing Operations -----------------------------------------------
1 subgroup completed in 0.003 seconds.
1 out of 1 (100%) subgroup passed.
-- done testing Levenshtein Operators ----------------------------------------
-- testing Levenshtein Vector Functor ----------------------------------------
-- testing fixnum cost ---------------------------------------------------
distance ......................................................... [ PASS]
cost-and-oper-matrix-match ....................................... [ PASS]
cost-and-oper-matrix-match: explicit opers ....................... [ PASS]
3 tests completed in 0.011 seconds.
3 out of 3 (100%) tests passed.
-- done testing fixnum cost ----------------------------------------------
1 subgroup completed in 0.014 seconds.
1 out of 1 (100%) subgroup passed.
-- done testing Levenshtein Vector Functor -----------------------------------
-- testing Levenshtein Path Iterator -----------------------------------------
iterator proc ........................................................ [ PASS]
-- testing iterator path -------------------------------------------------
gen 0 ............................................................ [ PASS]
gen 1 ............................................................ [ PASS]
gen 2 ............................................................ [ PASS]
gen 3 ............................................................ [ PASS]
gen 4 ............................................................ [ PASS]
gen 5 ............................................................ [ PASS]
6 tests completed in 0.0 seconds.
6 out of 6 (100%) tests passed.
-- done testing iterator path --------------------------------------------
1 test and 1 subgroup completed in 0.01 seconds.
1 out of 1 (100%) test passed.
1 out of 1 (100%) subgroup passed.
-- done testing Levenshtein Path Iterator ------------------------------------
-- testing Levenshtein Sequence Functor --------------------------------------
-- testing numbers cost & utf8 string ------------------------------------
(fnu8:levenshtein-distance/sequence "YWCQPGK" "LAWYQQKPGKA" elm... [ PASS]
(fnu8:levenshtein-distance/sequence "YWCQPGK" "LAWYQQKPGKA" elm... [ PASS]
(fnu8:levenshtein-distance/sequence "YWCQPGK" "LAWYQQKPGKA" ins... [ PASS]
3 tests completed in 0.001 seconds.
3 out of 3 (100%) tests passed.
-- done testing numbers cost & utf8 string -------------------------------
1 subgroup completed in 0.072 seconds.
1 out of 1 (100%) subgroup passed.
-- done testing Levenshtein Sequence Functor ---------------------------------