Ring middleware execution order

ring_middleware_order.clj

(defn handler
  []
  (println "HANDLER"))


(defn wrap-1
  [handler]
  (fn [request]
    (println 1)
    (handler request)
    (println 1)))


(defn wrap-2
  [handler]
  (fn [request]
    (println 2)
    (handler request)
    (println 2)))


(defn wrap-3
  [handler]
  (fn [request]
    (println 3)
    (handler request)
    (println 3)))

(-> handler
    wrap-1
    wrap-2
    wrap-3)

;; 3
;; 2
;; 1
;; <HANDLER>
;; 1
;; 2
;; 3