Test output for typed-records [ok]
Testing time: 1s
/root/salmonella-run-publish/chicken/bin/csi -script run.scm < /dev/null /root/salmonella-run-publish/chicken/bin/csi -s t.scm /root/salmonella-run-publish/chicken/bin/csc -feature compiling-extension -setup-mode -s -specialize -debug ox t.scm eliminated procedure checks: 25 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 eliminated procedure checks: 1 Warning: at toplevel: assignment of value of type `fixnum' to toplevel variable `person-age' does not match declared type `(procedure person-age ((struct person)) fixnum)' eliminated procedure checks: 1 eliminated procedure checks: 1 specializations: 1 (= fixnum fixnum) 2 (person-age (struct person)) 1 (point? (struct point)) 1 (get-baz (struct point3)) 1 (point-y (struct point)) 5 (cdr pair) 4 (car pair) 4 (eqv? * (not float)) 2 (person-planet-set! (struct person) *) 2 (person-species-set! (struct person) *) 2 (person-age-set! (struct person) *) 2 (person-name-set! (struct person) *) Removed `not' forms: 4 contracted procedure: k819 contracted procedure: k828 contracted procedure: k837 contracted procedure: k846 removed call to pure procedure with unused result: ##sys#slot removed call to pure procedure with unused result: ##sys#slot removed call to pure procedure with unused result: ##sys#slot replaced variables: 66 removed binding forms: 43 removed conditional forms: 1 contracted procedure: k1076 contracted procedure: k1078 contracted procedure: k1080 contracted procedure: k1087 removed binding forms: 57 removed binding forms: 8 simplifications: ((##core#call . 77)) call simplifications: ##sys#slot car 2 cdr 4 cons 4 list 3 ##sys#setslot 8 eq? 14 ##sys#get-keyword 2 ##sys#block-ref 12 ##sys#check-structure 21 ##sys#structure? 3 ##sys#make-structure 3 contracted procedure: k567 contracted procedure: k576 contracted procedure: k585 contracted procedure: k594 contracted procedure: k615 contracted procedure: k624 contracted procedure: k633 contracted procedure: k642 contracted procedure: k651 contracted procedure: k660 contracted procedure: k669 contracted procedure: k678 contracted procedure: k687 contracted procedure: k708 contracted procedure: k717 contracted procedure: k726 contracted procedure: k735 contracted procedure: k744 contracted procedure: k753 contracted procedure: k762 contracted procedure: k771 contracted procedure: k780 contracted procedure: k782 contracted procedure: k798 contracted procedure: k819 contracted procedure: k828 contracted procedure: k837 contracted procedure: k846 contracted procedure: k868 contracted procedure: k891 contracted procedure: k903 contracted procedure: k915 contracted procedure: k927 contracted procedure: k958 contracted procedure: k961 contracted procedure: k964 contracted procedure: k967 contracted procedure: k996 contracted procedure: k1070 contracted procedure: k999 contracted procedure: k1004 contracted procedure: k1014 contracted procedure: k1020 contracted procedure: k1030 contracted procedure: k1036 contracted procedure: k1046 contracted procedure: k1052 contracted procedure: k1062 contracted procedure: k1099 contracted procedure: k1092 removed binding forms: 50 customizable procedures: (loop136239 k883 k885 k887 k889) calls to known targets: 19 identified direct recursive calls: f_991 1 fast box initializations: 1