no title added by puck on Mon Jun 12 00:16:26 2023

; foo.scm: (csc -X r7rs -R r7rs)
(import test)

; test.import.scm:
(define-library (test)
    (export make-test)
    (begin
     (define-record-type
         test
         (make-test x)
         test?
         (x test set-test!))))