Test output for coops
Testing time: 33.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
(interpreted)
/usr/local/chicken-4.5.0/bin/csi -s tests.scm
#<coops instance of `<i1>'>#<coops instance of `<i1>'>
-- testing miscellaneous -----------------------------------------------------
(slot-initialized? i1 'y) ............................................ [ PASS]
(slot-initialized? i2 'y) ............................................ [ PASS]
(slot-initialized? i1 'x) ............................................ [ PASS]
(slot-initialized? i2 'x) ............................................ [ PASS]
(slot-value i1 'x) ................................................... [ PASS]
(slot-value i2 'x) ................................................... [ PASS]
(##sys#symbol-has-toplevel-binding? 'm1) ............................. [ PASS]
(m1 i1) .............................................................. [ PASS]
(##sys#symbol-has-toplevel-binding? 'm1) ............................. [ PASS]
(m1 i1) .............................................................. [ PASS]
(class-of <mc1>) ..................................................... [ PASS]
(set! (m1 i1) 42) .................................................... [ PASS]
(mx (make <cx>)) ..................................................... [ PASS]
(mx +) ............................................................... [ PASS]
(mx +) ............................................................... [ PASS]
(mx +) ............................................................... [ PASS]
(mx i1) .............................................................. [ PASS]
(s1 c1) .............................................................. [ PASS]
(s1 c1) .............................................................. [ PASS]
(begin (m (make D)) clist) ........................................... [ PASS]
20 tests completed in 0.036 seconds.
20 out of 20 (100%) tests passed.
-- done testing miscellaneous ------------------------------------------------
-- testing ScmObj examples ---------------------------------------------------
(slot-value Telemakhos 'name:) ....................................... [ PASS]
(slot-value Telemakhos 'favorite-drink:) ............................. [ PASS]
(slot-value Telemakhos 'favorite-drink:) ............................. [ PASS]
(class-of Telemakhos) ................................................ [ PASS]
(slot-value Odysseus 'name:) ......................................... [ PASS]
(slot-initialized? Odysseus 'favorite-drink:) ........................ [ PASS]
(handle-exceptions ex #f (slot-value Odysseus 'favorite-island:)) .... [ PASS]
(subclass? schemer-c human-c) ........................................ [ PASS]
(subclass? human-c schemer-c) ........................................ [ PASS]
(with-output-to-string (lambda () (for-each (lambda (person) (f... ... [ PASS]
(with-output-to-string (lambda () (for-each (lambda (person) (i... ... [ PASS]
(list (likes Odysseus lutefisk) (likes Odysseus champagne) (lik... ... [ PASS]
12 tests completed in 0.027 seconds.
12 out of 12 (100%) tests passed.
-- done testing ScmObj examples ----------------------------------------------
-- testing primitive classes -------------------------------------------------
(m2 "1" 2) ........................................................... [ PASS]
(m2 2.5 'a) .......................................................... [ PASS]
2 tests completed in 0.006 seconds.
2 out of 2 (100%) tests passed.
-- done testing primitive classes --------------------------------------------
-- testing metaclasses -------------------------------------------------------
(slot-value (make <a>) 'b) ........................................... [ PASS]
(meta-a <a>) ......................................................... [ PASS]
2 tests completed in 0.007 seconds.
2 out of 2 (100%) tests passed.
-- done testing metaclasses --------------------------------------------------
(compiled)
/usr/local/chicken-4.5.0/bin/csc -feature compiling-extension -setup-mode tests.scm -o a.out
./a.out
#<coops instance of `<i1>'>#<coops instance of `<i1>'>
-- testing miscellaneous -----------------------------------------------------
(slot-initialized? i1 'y) ............................................ [ PASS]
(slot-initialized? i2 'y) ............................................ [ PASS]
(slot-initialized? i1 'x) ............................................ [ PASS]
(slot-initialized? i2 'x) ............................................ [ PASS]
(slot-value i1 'x) ................................................... [ PASS]
(slot-value i2 'x) ................................................... [ PASS]
(##sys#symbol-has-toplevel-binding? 'm1) ............................. [ PASS]
(m1 i1) .............................................................. [ PASS]
(##sys#symbol-has-toplevel-binding? 'm1) ............................. [ PASS]
(m1 i1) .............................................................. [ PASS]
(class-of <mc1>) ..................................................... [ PASS]
(set! (m1 i1) 42) .................................................... [ PASS]
(mx (make <cx>)) ..................................................... [ PASS]
(mx +) ............................................................... [ PASS]
(mx +) ............................................................... [ PASS]
(mx +) ............................................................... [ PASS]
(mx i1) .............................................................. [ PASS]
(s1 c1) .............................................................. [ PASS]
(s1 c1) .............................................................. [ PASS]
(begin (m (make D)) clist) ........................................... [ PASS]
20 tests completed in 0.002 seconds.
20 out of 20 (100%) tests passed.
-- done testing miscellaneous ------------------------------------------------
-- testing ScmObj examples ---------------------------------------------------
(slot-value Telemakhos 'name:) ....................................... [ PASS]
(slot-value Telemakhos 'favorite-drink:) ............................. [ PASS]
(slot-value Telemakhos 'favorite-drink:) ............................. [ PASS]
(class-of Telemakhos) ................................................ [ PASS]
(slot-value Odysseus 'name:) ......................................... [ PASS]
(slot-initialized? Odysseus 'favorite-drink:) ........................ [ PASS]
(handle-exceptions ex #f (slot-value Odysseus 'favorite-island:)) .... [ PASS]
(subclass? schemer-c human-c) ........................................ [ PASS]
(subclass? human-c schemer-c) ........................................ [ PASS]
(with-output-to-string (lambda () (for-each (lambda (person) (f... ... [ PASS]
(with-output-to-string (lambda () (for-each (lambda (person) (i... ... [ PASS]
(list (likes Odysseus lutefisk) (likes Odysseus champagne) (lik... ... [ PASS]
12 tests completed in 0.002 seconds.
12 out of 12 (100%) tests passed.
-- done testing ScmObj examples ----------------------------------------------
-- testing primitive classes -------------------------------------------------
(m2 "1" 2) ........................................................... [ PASS]
(m2 2.5 'a) .......................................................... [ PASS]
2 tests completed in 0.001 seconds.
2 out of 2 (100%) tests passed.
-- done testing primitive classes --------------------------------------------
-- testing metaclasses -------------------------------------------------------
(slot-value (make <a>) 'b) ........................................... [ PASS]
(meta-a <a>) ......................................................... [ PASS]
2 tests completed in 0.001 seconds.
2 out of 2 (100%) tests passed.
-- done testing metaclasses --------------------------------------------------
(benchmarks - coops)
/usr/local/chicken-4.5.0/bin/csc -feature compiling-extension -setup-mode bench.scm -D c -O3 -o a.out
./a.out
benchmarking 1000000 normal procedure calls ...
0.032 seconds elapsed
0 seconds in (major) GC
0 mutations
245 minor GCs
0 major GCs
benchmarking 1000000 generic procedure calls ...
0.58 seconds elapsed
0.004 seconds in (major) GC
6 mutations
1588 minor GCs
7 major GCs
benchmarking 1000000 generic procedure calls (alternating) ...
7.312 seconds elapsed
0.272 seconds in (major) GC
6499996 mutations
245 minor GCs
396 major GCs
benchmarking 1000000 slot accesses ...
0.16 seconds elapsed
0 seconds in (major) GC
0 mutations
4276 minor GCs
0 major GCs
(benchmarks - tinyclos)
/usr/local/chicken-4.5.0/bin/csc -feature compiling-extension -setup-mode bench.scm -D tc -O3 -o a.out
./a.out
benchmarking 1000000 normal procedure calls ...
0.032 seconds elapsed
0 seconds in (major) GC
0 mutations
245 minor GCs
0 major GCs
benchmarking 1000000 generic procedure calls ...
1.0 seconds elapsed
0.084 seconds in (major) GC
2000008 mutations
119 minor GCs
103 major GCs
benchmarking 1000000 generic procedure calls (alternating) ...
0.996 seconds elapsed
0.088 seconds in (major) GC
2000010 mutations
200 minor GCs
103 major GCs
benchmarking 1000000 slot accesses ...
0.184 seconds elapsed
0.004 seconds in (major) GC
0 mutations
2805 minor GCs
2 major GCs