Welcome to the CHICKEN Scheme pasting service

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

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which one-argument R5RS procedure returns 3 when given `'(1 2 3 4)' as input?
Visually impaired? Let me spell it for you (wav file) download WAV