        (loop [~i 0]
          (when (< ~i n#)
            ~@body
-           (recur (unchecked-inc ~i)))))))
+           (recur (inc ~i)))))))
 
 #_(defn into
   "Returns a new coll consisting of to-coll with all of the items of

  "Same as (refer 'clojure.core <filters>)"
  {:added "1.0"}
  [& filters]
  (apply refer 'clojure.core filters))

(defmacro defonce
  "defs name to have the root value of the expr iff the named var has no root value,


(defn char
  "Coerce to char"
  {:inline (fn  [x] `(. clojure.lang.RT (~'charCast ~x)))
   :added "1.1"}
  [x]
  (throw "unimplemented cast to char")
