define-record-type with custom protocol on parent doesn't raise an error

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

This should raise an error but it'll be runtime error

#!r6rs
(import (rnrs))

(define-record-type this-parent
  (fields count elements)
  (protocol
   (lambda (p)
     (lambda (size)
       (p size (make-vector size))))))
;; error
(define-record-type child
  (fields attr)
  (parent this-parent))

Comments (1)

  1. Log in to comment