Custom implementation of clojure 'comp'.

custom-comp.clj

(defn custom-comp

  "Custom implementation of clojure 'comp'.
  Accepts a set of functions and returns a composite of 
  those functions.
  ex, ((custom-comp f1 f2 f3) some-argument) = (f1(f2(f3(some-argument))))"

  [& fns]
  (fn [& params]
    (loop [fn-list fns
           args params]
      (if (> 2 (count fn-list))
          ((first fn-list) args)
          (recur
            (butlast fn-list)
            ((last fn-list) args))))))