Welcome to the CHICKEN Scheme pasting service

define wrapper added by evhan on Thu Sep 7 01:29:37 2017

(module _ ()
  (import (only chicken print)
          (rename scheme (define define0)))
  (define-syntax define
    (syntax-rules ()
      ((_ a . b)
       (define0 a (begin (print "rubber") . b)))))
  (define (duck) (print "duck"))
  (duck))

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
What's the equality predicate for strings in R5RS?
Visually impaired? Let me spell it for you (wav file) download WAV