История изменений

Исправление monk, 23.03.14 12:58 (текущая версия) :

(define-syntax change
  (syntax-rules (foo)
   [(change (foo a b c)) (bar (+ a b) (+ a c))]
   [(change (body ...)) ((change body) ...))]
   [(change t) t]))

Исправление monk, 23.03.14 12:57:

Даже

(define-syntax change
  (syntax-rules 
   [(change (foo a b c)) (bar (+ a b) (+ a c))]
   [(change (body ...)) ((change body) ...))]
   [(change t) t]))

Исправление monk, 23.03.14 12:57:

Даже

(define-syntax change
  (syntax-rules 
   [(change (foo a b c)) (bar (+ a b) (+ a c))]
   [(change (body ...)) ((change body) ...))]
   [(change t) t)]))

Исходная версия monk, 23.03.14 12:56:

Даже

(define-syntax change
  (syntax-rules 
   [(change (foo a b c)) (bar (+ a b) (+ a c))]
   [(change (body ...)) ((change body) ...))]))