Test output for coops [ok]
Testing time: 27s
/root/salmonella-run-publish/chicken/bin/csi -script run.scm < /dev/null (interpreted) /root/salmonella-run-publish/chicken/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.045 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.037 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.007 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.006 seconds. 2 out of 2 (100%) tests passed. -- done testing metaclasses -------------------------------------------------- (compiled) /root/salmonella-run-publish/chicken/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.003 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.003 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) /root/salmonella-run-publish/chicken/bin/csc -feature compiling-extension -setup-mode bench.scm -D c -O3 -o a.out ./a.out benchmarking 1000000 normal procedure calls ... 0.036s CPU time, 0/122 GCs (major/minor) benchmarking 1000000 generic procedure calls ... 0.672s CPU time, 0.004s GC time (major), 6 mutations, 7/8058 GCs (major/minor) benchmarking 1000000 generic procedure calls (alternating) ... 10.676s CPU time, 0.46s GC time (major), 6499996 mutations, 585/186576 GCs (major/minor) benchmarking 1000000 slot accesses ... 0.308s CPU time, 1/4032 GCs (major/minor) (benchmarks - tinyclos) /root/salmonella-run-publish/chicken/bin/csc -feature compiling-extension -setup-mode bench.scm -D tc -O3 -o a.out ./a.out benchmarking 1000000 normal procedure calls ... 0.032s CPU time, 0/122 GCs (major/minor) benchmarking 1000000 generic procedure calls ... 1.92s CPU time, 0.148s GC time (major), 2000008 mutations, 148/26775 GCs (major/minor) benchmarking 1000000 generic procedure calls (alternating) ... 1.996s CPU time, 0.156s GC time (major), 2000010 mutations, 149/26711 GCs (major/minor) benchmarking 1000000 slot accesses ... 1.264s CPU time, 7/11959 GCs (major/minor)