; 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!))))