Correctly coerce to long

Author: vemv

src/refactor_nrepl/find/find_locals.clj

@@ -6,12 +6,14 @@
    [refactor-nrepl.core :as core]
    [refactor-nrepl.s-expressions :as sexp]))
 
-(defn find-used-locals  [{:keys [file ^long line ^long column]}]
+(defn find-used-locals  [{:keys [file line column]}]
   {:pre [(number? line)
          (number? column)
          (not-empty file)]}
   (core/throw-unless-clj-file file)
-  (let [content (slurp file)
+  (let [line (long line)
+        column (long column)
+        content (slurp file)
         ast (ana/ns-ast content)
         sexp (sexp/get-enclosing-sexp content (dec line) (dec column))
         selected-sexp-node (->> ast