* boot-9.scm (struct-layout, %struct-printer-tag, struct-printer,
authorMarius Vollmer <mvo@zagadka.de>
Wed, 4 Jun 1997 22:39:09 +0000 (22:39 +0000)
committerMarius Vollmer <mvo@zagadka.de>
Wed, 4 Jun 1997 22:39:09 +0000 (22:39 +0000)
commitfa7e92746642ed139eaad0250d3c2a953bcd32dc
tree55011b4828dd41f8037a972d84d22c41020ac4cb
parent7507aba15947c350860c4bf474c32d5dbe5e718a
* boot-9.scm (struct-layout, %struct-printer-tag, struct-printer,
make-struct-printer, set-struct-printer-in-vtable!): New bindings
to support printing of structures.
(record-type-vtable, make-record-type): Add slot to hold printing
function and initialize it with something appropriate.  Removed
commented out printing code.
(record-type-name, record-type-fields): Adjusted slot offsets.
(%print-module): Reduce argument list to "mod" and "port".
ice-9/boot-9.scm