Comment 7 for bug 309223

Here is a variation on the theme:

#!r6rs
(import (rnrs))

(define lit 41)

(define-syntax foo
 (syntax-rules (lit)
   ((_ lit)
    (syntax-rules () ((_) lit)))))

(let ((lit2 42))
  (let-syntax ((z (foo lit)))
    (display (z))))

This should not run.

Changing lit2 to lit raises what seems an incorrect error.

Cheers

leppie