Christian Jaeger wrote:
(define-bothtimes (pp-through a #!optional (b no-value))
(I have missed to change |define-bothtimes| to |define|; it's been there to define that procedure also during compilation, since I've been using pp-through in macros in the same file; define-bothtimes is:
(define-macro (define-bothtimes . l) (let ((code `(define ,@l))) (eval code) code))
.)