Welcome to the CHICKEN Scheme pasting service

Running with csi -n added by DeeEff on Wed Sep 7 20:41:10 2022

$ csi -n
#;1> (import (scheme eval)) 
; loading /var/lib//chicken/11/scheme.eval.import.so ...

Note: re-importing already imported identifier: eval
; loading /var/lib//chicken/11/scheme.eval.so ...
; loading /var/lib//chicken/11/r7rs-library.so ...
#;2> (eval '(+ 1 3) (environment '(except (scheme base) +)))
; loading /var/lib//chicken/11/r7rs.import.so ...
; loading /var/lib//chicken/11/chicken.platform.import.so ...
; loading /var/lib//chicken/11/srfi-4.import.so ...
; loading /var/lib//chicken/11/scheme.base.import.so ...
; loading /var/lib//chicken/11/chicken.fixnum.import.so ...
; loading /var/lib//chicken/11/chicken.condition.import.so ...
; loading /var/lib//chicken/11/r7rs-support.import.so ...
; loading /var/lib//chicken/11/chicken.io.import.so ...
; loading /var/lib//chicken/11/srfi-13.import.so ...
; loading /var/lib//chicken/11/chicken.string.import.so ...
; loading /var/lib//chicken/11/srfi-14.import.so ...
; loading /var/lib//chicken/11/r7rs-support.so ...
; loading /var/lib//chicken/11/r7rs-compile-time.so ...
; loading /var/lib//chicken/11/srfi-1.so ...

Note: re-importing already imported syntax: cond-expand

Note: re-importing already imported syntax: cond-expand

Note: re-importing already imported syntax: cond-expand

Note: re-importing already imported syntax: cond-expand
; loading /var/lib//chicken/11/r7rs.so ...
; loading /var/lib//chicken/11/scheme.base.so ...
; loading /var/lib//chicken/11/srfi-13.so ...
; loading /var/lib//chicken/11/srfi-14.so ...
4

Your annotation:

Enter a new annotation:

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