id	summary	reporter	owner	description	type	status	priority	milestone	component	version	resolution	keywords	cc	difficulty
1464	ir-macro-expander's compare + define-syntax + modules don't mix	megane		"This snippet is supposed to print ""it is x"", but doesn't if there's a macro called `x` in the module.

{{{
module
 m
 (foo)
 ;; (import chicken scheme)
 (import (chicken syntax) scheme)

 ;; (define-syntax x (ir-macro-transformer (lambda _ `(begin))))

 ;; (define (x) (begin)) ;; This is OK

 (define-syntax foo
   (ir-macro-transformer
    (lambda (e inj cmp)
      (apply
       (lambda (a)
         (if (cmp 'x a) ""it is x"" ""fail""))
       (cdr e))))))

(import m)
(print (foo x))

}}}"	defect	new	major	6.0.0	expander	5.0.0