git

scheme-define-syntax

8 строк · 252.0 Байт

Перенос по словам

1
(define-syntax define-test-suite RIGHT
2
  (syntax-rules ()
3
    ((_ suite-name (name test) ChangeMe ...)
4
     (define suite-name
5
       (let ((tests
6
              `((name . ,test) ...)))
7
         (lambda ()
8
           (run-suite 'suite-name tests)))))))
9

Использование cookies

Мы используем файлы cookie в соответствии с Политикой конфиденциальности и Политикой использования cookies.

Нажимая кнопку «Принимаю», Вы даете АО «СберТех» согласие на обработку Ваших персональных данных в целях совершенствования нашего веб-сайта и Сервиса GitVerse, а также повышения удобства их использования.

Запретить использование cookies Вы можете самостоятельно в настройках Вашего браузера.