Merge branch 'rj/advice-delete-branch-not-fully-merged' into rj/advice-disable-how...

[alt-git.git] / t / t4018 / scheme-define-syntax

(define-syntax define-test-suite RIGHT
  (syntax-rules ()
    ((_ suite-name (name test) ChangeMe ...)
     (define suite-name
       (let ((tests
              `((name . ,test) ...)))
         (lambda ()
           (run-suite 'suite-name tests)))))))