Test output for persistent-hash-map [ok]
Testing time: 0s
/home/mario/local/chicken-4.8.0.3/bin/csi -script run.scm < /dev/null
-- testing ------------------------------------------------------------------
-- testing map-add, map-delete, map-contains?, map-equal? ----------------
(map-size m1) .................................................... [ PASS]
(map-size m2) .................................................... [ PASS]
(map-equal? m1 m2) ............................................... [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(map-ref m1 i) ................................................... [ PASS]
(map-ref m2 i) ................................................... [ PASS]
(map-contains? m1 i) ............................................. [ PASS]
(map-contains? m2 i) ............................................. [ PASS]
(not (map-contains? (map-delete m1 3) 3)) ........................ [ PASS]
404 tests completed in 0.019 seconds.
404 out of 404 (100%) tests passed.
-- done testing map-add, map-delete, map-contains?, map-equal? -----------
-- testing map-delete ----------------------------------------------------
(map-size m) ..................................................... [ PASS]
(map-equal? m (persistent-map 0 0 1 1 2 2 4 4 6 6 8 8 9 9)) ...... [ PASS]
2 tests completed in 0.0 seconds.
2 out of 2 (100%) tests passed.
-- done testing map-delete -----------------------------------------------
-- testing transient maps ------------------------------------------------
(map-size m) ..................................................... [ PASS]
(map-equal? m (persistent-map 0 0 1 1 2 2 4 4 6 6 8 8 9 9)) ...... [ PASS]
(map-ref tm k) ................................................... [ PASS]
(map-ref tm k) ................................................... [ PASS]
(map-ref tm k) ................................................... [ PASS]
(map-ref tm k) ................................................... [ PASS]
(map-ref tm k) ................................................... [ PASS]
(map-ref tm k) ................................................... [ PASS]
(map-ref tm k) ................................................... [ PASS]
(handle-exceptions e 2 (map-delete! tm 1) 1) ..................... [ PASS]
(handle-exceptions e 2 (map-add! tm 10 10) 1) .................... [ PASS]
(handle-exceptions e 2 (persist-map! tm) 1) ...................... [ PASS]
(handle-exceptions e 2 (map-size tm) 1) .......................... [ PASS]
(map-equal? m (persistent-map 0 0 1 1 2 2 4 4 6 6 8 8 9 9)) ...... [ PASS]
(map-ref m 1) .................................................... [ PASS]
(map-ref m 5) .................................................... [ PASS]
(map-ref tm 5) ................................................... [ PASS]
17 tests completed in 0.001 seconds.
17 out of 17 (100%) tests passed.
-- done testing transient maps -------------------------------------------
-- testing map-reduce ----------------------------------------------------
(map-reduce + 0 (apply persistent-map (iota 1000))) .............. [ PASS]
1 test completed in 0.002 seconds.
1 out of 1 (100%) test passed.
-- done testing map-reduce -----------------------------------------------
-- testing map-keys, map-values ------------------------------------------
(lset= eq? '(foo bar baz) (map-keys m)) .......................... [ PASS]
(lset= eq? '(1 2 3) (map-values m)) .............................. [ PASS]
2 tests completed in 0.001 seconds.
2 out of 2 (100%) tests passed.
-- done testing map-keys, map-values -------------------------------------
-- testing hash collisions -----------------------------------------------
(map-size m) ..................................................... [ PASS]
(map-ref m key-a) ................................................ [ PASS]
(map-ref m key-b) ................................................ [ PASS]
(map-ref (map-delete m key-b) key-a) ............................. [ PASS]
(map-ref (map-delete m key-a) key-b) ............................. [ PASS]
(map-ref tm key-a) ............................................... [ PASS]
(map-ref tm key-b) ............................................... [ PASS]
(map-size tm) .................................................... [ PASS]
(map-ref tm key-b) ............................................... [ PASS]
9 tests completed in 0.001 seconds.
9 out of 9 (100%) tests passed.
-- done testing hash collisions ------------------------------------------
-- testing map-merge -----------------------------------------------------
(map-ref m 1) .................................................... [ PASS]
(map-ref m 3) .................................................... [ PASS]
(map-ref m 5) .................................................... [ PASS]
(map-ref m1 1) ................................................... [ PASS]
(map-ref m1 5) ................................................... [ PASS]
(map-ref m2 1) ................................................... [ PASS]
(map-ref m2 5) ................................................... [ PASS]
7 tests completed in 0.0 seconds.
7 out of 7 (100%) tests passed.
-- done testing map-merge ------------------------------------------------
-- testing map-ref-in, map-update-in -------------------------------------
(map-ref-in m '(foo bar)) ........................................ [ PASS]
(map-ref-in m '(foo baz qux)) .................................... [ PASS]
2 tests completed in 0.001 seconds.
2 out of 2 (100%) tests passed.
-- done testing map-ref-in, map-update-in --------------------------------
8 subgroups completed in 0.054 seconds.
8 out of 8 (100%) subgroups passed.
-- done testing -------------------------------------------------------------