[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Help: equivalent syntax-case to defmacro
From: |
Dale Mellor |
Subject: |
Help: equivalent syntax-case to defmacro |
Date: |
Tue, 05 May 2020 18:34:25 +0100 |
User-agent: |
Evolution 3.30.5-1.1 |
Been struggling with this for a while, and nothing I try works.
In test-suite/tests/getopt-long there is
(defmacro deferr (name-frag re)
(let ((name (symbol-append 'exception: name-frag)))
`(define ,name (cons 'quit ,re))))
(deferr no-such-option "no such option")
(display exception:no-such-option)
and I would like to know how the equivalent with define-syntax... syntax-case
would look.
Thanks,
Dale
- Help: equivalent syntax-case to defmacro,
Dale Mellor <=