Returns a function which will call FUNCTION passing it the passed args and then INITIAL-ARGS. (funcall (rcurry #'list 1) 2) ==> (list 2 1)
(defun rcurry (function &rest initial-args)
"Returns a function which will call FUNCTION passing it the
passed args and then INITIAL-ARGS.
(funcall (rcurry #'list 1) 2) ==> (list 2 1)"
(lambda (&rest args)
(apply function (append args initial-args))))Source Context