> (define-syntax (mm stx)
> (syntax-case stx ()
> [(_ input ...)
> (let* ((l1 (syntax '(input ...)))
> (templates (... process/and/recognize msets in
> l1 ...)))
> (datum->syntax stx
> `(lambda (x) ,(inject-code
> patterns)) ;mistake
`(lambda (x) ,(inject-code templates))
> stx))])) Sorry, I did a mistake in the macro example... Cheers, Maurizio. _________________________________________________ For list-related administrative tasks: http://lists.racket-lang.org/listinfo/users
