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) :
Type in the text below:
 _                              __ 
| |__   __ _  __ _ _   _  __ _ / _|
| '_ \ / _` |/ _` | | | |/ _` | |_ 
| |_) | (_| | (_| | |_| | (_| |  _|
|_.__/ \__, |\__, |\__, |\__,_|_|  
       |___/ |___/ |___/           
Visually impaired? Let me spell it for you (wav file) download WAV