| From: Maurizio Giordano (maurizio.giorda at gmail.com) Date: Fri Jul 29 12:22:26 EDT 2011 |
|
> (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.
| Posted on the users mailing list. |
|