Haschoo-0.0: tests/macros/access-newvar.scm

(define-syntax m (syntax-rules () ((m x) x)))
(let ((x 'ok))
  (write (m x))
  (newline))