I wrote:
(import-for-syntax matchable)

(define-syntax define-macro
  (lambda (m . _)
    `(define-syntax ,(caadr m)
       (lambda (e . _)
         (match e
           (,(cadr m) ,@(cddr m)))))))

Eduardo, does this work for you?
I've tried it with some old macros I had lying around and it seems to work.

If you (and others) can confirm it works with all your existing base of define-macro code and it doesn't introduce new problems*, maybe we could make an egg of it.

-Tobia

* I know it doesn't solve any of define-macro's problems either, but that's not the aim.


_______________________________________________
Chicken-users mailing list
[email protected]
http://lists.nongnu.org/mailman/listinfo/chicken-users

Reply via email to