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