Здравствуйте, frogkiller, Вы писали:

F>P.S. Я так понимаю, если б в scheme были бы каррированные функции, то apply легко могла быть реализована в виде функции.

apply можно реализовать в виде функции через eval

(define (apply2 proc . lst)
  (define (gather lst)
    (if (null? (cdr lst))
        (car lst)
        (cons (car lst) (gather (cdr lst)))))
  (eval (cons proc (gather lst))))

Без eval можно в виде макроса.