   (throw "unsupported refs")
   #_`(sync nil ~@exprs))
 
-#_ ((defmacro with-precision
-      "Sets the precision and rounding mode to be used for BigDecimal operations.
-
-  Usage: (with-precision 10 (/ 1M 3))
-  or:    (with-precision 10 :rounding HALF_DOWN (/ 1M 3))
-
-  The rounding mode is one of CEILING, FLOOR, HALF_UP, HALF_DOWN,
-  HALF_EVEN, UP, DOWN and UNNECESSARY; it defaults to HALF_UP."
-      {:added "1.0"}
-      [precision & exprs]
-      (let [[body rm] (if (= (first exprs) :rounding)
-                        [(next (next exprs))
-                         `((. java.math.RoundingMode ~(second exprs)))]
-                        [exprs nil])]
-        `(binding [*math-context* (java.math.MathContext. ~precision ~@rm)]
-           ~@body)))
-
+#_ (
     (defn mk-bound-fn
       {:private true}
       [^clojure.lang.Sorted sc test key]

  [& body]
  (list 'new 'clojerl.LazySeq (list* '^{:once true} fn* [] body)))

#_((defn ^clojure.lang.ChunkBuffer chunk-buffer ^clojure.lang.ChunkBuffer [capacity]
     (throw "unimplemented chunked seq")
     #_(clojure.lang.ChunkBuffer. capacity))


               (/ (- stop# start#) 1000000.0)
               " msecs"))
     ret#))

(defn macroexpand-1
  "If form represents a macro form, returns its expansion,
