Test output for dsssl-utils [ok]

Testing time: 3s

'/usr/home/chicken/salmonella/build/salmonella-run-publish/chicken/bin/csi' -script run.scm < /dev/null 2>&1
*** csi ***

-- testing dssl-utils --------------------------------------------------------

    -- testing dsssl-fixup ---------------------------------------------------
    (f 1 2 k1: 4 3) .................................................. [ PASS]
    (f 1 2 3 k1: 4 5 k2:) ............................................ [ PASS]
    (f 1 2 k1: 3 4 5 k2: 6 7 8) ...................................... [ PASS]
    (f 1 2 3 k1: 4 k2: 5 6 7 8) ...................................... [ PASS]
    (f 1 2 3 k1: 4 5 k2: 6 7 8) ...................................... [ PASS]
    (f 1 2 3 k1: 4 5 k2: 6) .......................................... [ PASS]
    6 tests completed in 0.002 seconds.
    6 out of 6 (100%) tests passed.
    -- done testing dsssl-fixup ----------------------------------------------


    -- testing lambda+ -------------------------------------------------------
    (foo 1 2 3 k1: 4 5 6 7 8) ........................................ [ PASS]
    (foo+ 1 2 3 k1: 4 5 6 7 8) ....................................... [ PASS]
    2 tests completed in 0.0 seconds.
    2 out of 2 (100%) tests passed.
    -- done testing lambda+ --------------------------------------------------


    -- testing typed-define-record -------------------------------------------
    (trec? trec) ..................................................... [ PASS]
    (trec-b trec) .................................................... [ PASS]
    (trec-b trec) .................................................... [ PASS]
    3 tests completed in 0.0 seconds.
    3 out of 3 (100%) tests passed.
    -- done testing typed-define-record --------------------------------------


    -- testing typed-define --------------------------------------------------
    only needs to expand ............................................. [ PASS]
    only needs to expand ............................................. [ PASS]
    only needs to expand ............................................. [ PASS]
    3 tests completed in 0.0 seconds.
    3 out of 3 (100%) tests passed.
    -- done testing typed-define ---------------------------------------------

4 subgroups completed in 0.027 seconds.
4 out of 4 (100%) subgroups passed.
-- done testing dssl-utils ---------------------------------------------------


*** csc (-inline-global -scrutinize -optimize-leaf-routines -local -inline -specialize -unsafe -no-trace -no-lambda-info -clustering -lfa2) ***

Warning: in local unknown procedure,
  in local unknown procedure,
  in local unknown procedure,
  in toplevel unknown procedure:
  (dsssl-utils-test.scm:99) in procedure call to `atom-mutate!-2', expected argument #1 of type `(struct <trec>)' but was given an argument of type `undefined'

Warning: in local unknown procedure,
  in local unknown procedure,
  in local unknown procedure,
  in toplevel unknown procedure:
  (dsssl-utils-test.scm:99) in procedure call to `atom-mutate!-2', expected argument #2 of type `procedure' but was given an argument of type `undefined'

expect compiler warnings for atom-mutate!-2


-- testing dssl-utils --------------------------------------------------------

    -- testing dsssl-fixup ---------------------------------------------------
    (f 1 2 k1: 4 3) .................................................. [ PASS]
    (f 1 2 3 k1: 4 5 k2:) ............................................ [ PASS]
    (f 1 2 k1: 3 4 5 k2: 6 7 8) ...................................... [ PASS]
    (f 1 2 3 k1: 4 k2: 5 6 7 8) ...................................... [ PASS]
    (f 1 2 3 k1: 4 5 k2: 6 7 8) ...................................... [ PASS]
    (f 1 2 3 k1: 4 5 k2: 6) .......................................... [ PASS]
    6 tests completed in 0.001 seconds.
    6 out of 6 (100%) tests passed.
    -- done testing dsssl-fixup ----------------------------------------------


    -- testing lambda+ -------------------------------------------------------
    (foo 1 2 3 k1: 4 5 6 7 8) ........................................ [ PASS]
    (foo+ 1 2 3 k1: 4 5 6 7 8) ....................................... [ PASS]
    2 tests completed in 0.0 seconds.
    2 out of 2 (100%) tests passed.
    -- done testing lambda+ --------------------------------------------------


    -- testing typed-define-record -------------------------------------------
    (trec? trec) ..................................................... [ PASS]
    (trec-b trec) .................................................... [ PASS]
    (trec-b trec) .................................................... [ PASS]
    3 tests completed in 0.0 seconds.
    3 out of 3 (100%) tests passed.
    -- done testing typed-define-record --------------------------------------


    -- testing typed-define --------------------------------------------------
    only needs to expand ............................................. [ PASS]
    only needs to expand ............................................. [ PASS]
    only needs to expand ............................................. [ PASS]
    3 tests completed in 0.0 seconds.
    3 out of 3 (100%) tests passed.
    -- done testing typed-define ---------------------------------------------

4 subgroups completed in 0.002 seconds.
4 out of 4 (100%) subgroups passed.
-- done testing dssl-utils ---------------------------------------------------