user=> (-> '(dt/loopr [sum 0] [x xs] (recur (+ sum x))) macroexpand pprint)
(let* [sum 0
       sum (clojure.core/reduce
             (clojure.core/fn reduce-x-2686 [sum x]
               (. clojure.lang.Numbers (add sum x)))
             sum
             xs)]
  sum)