Test output for stack

Testing time: 16.0s

CHICKEN_INSTALL_PREFIX=/root/src/salmonella/salmonella-4.5.0/repo CHICKEN_INCLUDE_PATH=/root/src/salmonella/salmonella-4.5.0/repo/share/chicken CHICKEN_REPOSITORY=/root/src/salmonella/salmonella-4.5.0/repo/lib/chicken/5 /usr/local/chicken-4.5.0/bin/csi -script run.scm

-- testing Empty Stack -------------------------------------------------------
(make-stack) ......................................................... [ PASS]
(stack? (make-stack)) ................................................ [ PASS]
(stack-empty? (make-stack)) .......................................... [ PASS]
(stack-count (make-stack)) ........................................... [ PASS]
4 tests completed in 0.001 seconds.
4 out of 4 (100%) tests passed.
-- done testing Empty Stack --------------------------------------------------


-- testing Push!/Pop!/Peek/Poke! ---------------------------------------------
(stack-count stk) .................................................... [ PASS]
(stack-pop! stk) ..................................................... [ PASS]
(stack-pop! stk) ..................................................... [ PASS]
(stack-pop! stk) ..................................................... [ PASS]
(stack-empty? stk) ................................................... [ PASS]
(stack-pop! stk) ..................................................... [ PASS]
(stack-peek stk 1) ................................................... [ PASS]
(stack-pop! stk) ..................................................... [ PASS]
(stack-pop! stk) ..................................................... [ PASS]
(stack-count stk) .................................................... [ PASS]
10 tests completed in 0.001 seconds.
10 out of 10 (100%) tests passed.
-- done testing Push!/Pop!/Peek/Poke! ----------------------------------------


-- testing Cut! --------------------------------------------------------------
(stack-cut! stk 1 2) ................................................. [ PASS]
(stack-count stk) .................................................... [ PASS]
(stack-cut! stk 0 1) ................................................. [ PASS]
(stack-count stk) .................................................... [ PASS]
(stack-cut! stk 1 3) ................................................. [ PASS]
(stack-count stk) .................................................... [ PASS]
(stack-cut! stk -1 3) ................................................ [ PASS]
(stack-cut! stk 0 3) ................................................. [ PASS]
(stack-cut! stk 0 -3) ................................................ [ PASS]
9 tests completed in 0.001 seconds.
9 out of 9 (100%) tests passed.
-- done testing Cut! ---------------------------------------------------------


-- testing Stack from List ---------------------------------------------------
(stack->list stk) .................................................... [ PASS]
(stack? stk1) ........................................................ [ PASS]
(stack-count stk1) ................................................... [ PASS]
(stack-pop! stk1) .................................................... [ PASS]
4 tests completed in 0 seconds.
4 out of 4 (100%) tests passed.
-- done testing Stack from List ----------------------------------------------