Abdulaziz Ghuloum wrote:

(define-syntax curry
  (syntax-rules ()
    [(_ proc x) (lambda (x) (proc x))]
    [(_ proc x x* ...)
     (lambda (x)
       (curry (lambda (x* ...) (proc x x* ...)) x* ...))]))

:-)

This one's from The Book! ;-)

Ed

Reply via email to