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. |
|