Fix `define-condition-type' to use condition-accessors, not record
authorJulian Graham <julian.graham@aya.yale.edu>
Fri, 18 Jun 2010 13:49:30 +0000 (09:49 -0400)
committerJulian Graham <julian.graham@aya.yale.edu>
Fri, 18 Jun 2010 13:49:30 +0000 (09:49 -0400)
commit00f79aa4a0953f2f7348aa20f09b34fda257df32
treec7ed50479d8cc10f1dd020ec1ee0331967c2622e
parent5827e220abac373645e637ece99a9c6550c96bf0
Fix `define-condition-type' to use condition-accessors, not record
accessors.

* module/rnrs/conditions.scm (define-condition-type): The generated
  accessors should be condition accessors, which know how to unpack a
  compound condition; these can then delegate to the appropriate record
  accessors.
* test-suite/tests/r6rs-conditions.test: New test case to verify above.
module/rnrs/conditions.scm
test-suite/tests/r6rs-conditions.test