Clojure 1.3 bug output

gistfile1.clj

REPL started; server listening on localhost:32980.
(defmacro with []
  (let [var-name (with-meta 'something {:dynamic true})]
    `(do
       (let [with-component# (atom 42)]
         (declare ~var-name)
         with-component#))))

#'user/with
(list
  (def _with_ (with))
  (def _example_ (fn [] @something))
  )

(with-bindings {#'something _with_}
    (_example_)
(#'user/_with_ #'user/_example_)
user=> user=>   )
ClassCastException clojure.lang.Var$Unbound cannot be cast to clojure.lang.IDeref  clojure.core/deref (core.clj:2078)