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