Welcome to the CHICKEN Scheme pasting service

define-compiler-syntax added by megane on Thu Aug 13 17:18:33 2020

(import (chicken fixnum))

(define-compiler-syntax fx+
  (syntax-rules ()
    ((_ a b c r ...) (fx+ a (fx+ b c r ...)))))

(print (fx+ 1 2 3 4))

;; $ csc compiler-syntax.scm && ./compiler-syntax
;; 10
[ permalink | raw ]

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