(module m3 ()
  (import (rename scheme (define s:define)))
  (import (only (chicken base) assert))
  (define-syntax define
    (syntax-rules ()
      ((_) (display 'oink))))
  (define)
  (let ()
    (define a 1)
    (assert (= a 1)))
  (define)
  (newline))