4 lines
108 B
Common Lisp
4 lines
108 B
Common Lisp
|
(defun curry (function &rest args-1)
|
||
|
|
(lambda (&rest args-2)
|
||
|
|
(apply function (append args-1 args-2))))
|