Defining record-constructor-descriptor overwrites previous one

Create issue
Issue #107 resolved
Takashi Kato repo owner created an issue

This should be valid but raises an exception.

#!r6rs
(import (rnrs))

(define-record-type <foo>
  (fields a b))

(define foo-rcd (make-record-constructor-descriptor 
                 (record-type-descriptor <foo>) #f
                 (lambda (p) (lambda () (p 1 2)))))

((record-constructor (record-constructor-descriptor <foo>)) 1 2)

The default protocol is overwritten by foo-rcd's protocol.

Comments (1)

  1. Log in to comment