diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj
index c4710c6..155568c 100644
--- a/src/clj/clojure/core.clj
+++ b/src/clj/clojure/core.clj
@@ -6153,21 +6153,21 @@
   ([f & opts]
      (let [opts (normalize-slurp-opts opts)
            sb (StringBuilder.)]
-       (with-open [#^java.io.Reader r (apply jio/reader f opts)]
-         (loop [c (.read r)]
+       (with-open [#^java.io.Reader rdr (apply jio/reader f opts)]
+         (loop [c (.read rdr)]
            (if (neg? c)
              (str sb)
              (do
                (.append sb (char c))
-               (recur (.read r)))))))))
+               (recur (.read rdr)))))))))
 
 (defn spit
   "Opposite of slurp.  Opens f with writer, writes content, then
   closes f. Options passed to clojure.java.io/writer."
   {:added "1.2"}
   [f content & options]
-  (with-open [#^java.io.Writer w (apply jio/writer f options)]
-    (.write w (str content))))
+  (with-open [#^java.io.Writer wrt (apply jio/writer f options)]
+    (.write wrt (str content))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; futures (needs proxy);;;;;;;;;;;;;;;;;;
 (defn future-call