Merge pull request #7 from sogaiu/reflection-warnings

Address reflection warnings

Author: plexus

src/lambdaisland/deep_diff/diff.clj

@@ -100,7 +100,7 @@
 (defn- val-type [val]
   (let [t (type val)]
     (if (class? t)
-      (symbol (.getName t))
+      (symbol (.getName ^Class t))
       t)))
 
 (defn- diff-map [exp act]
@@ -143,7 +143,7 @@
 (extend Object
   Diff
   {:diff-similar (fn [exp act]
-                   (if (.isArray (.getClass exp))
+                   (if (.isArray (.getClass ^Object exp))
                      (diff-seq exp act)
                      (diff-atom exp act)))})
 

src/lambdaisland/deep_diff/printer.clj

@@ -75,7 +75,7 @@
             (puget/format-doc printer v)]))))})
 
 (defn- print-handler-resolver [extra-handlers]
-  (fn [klz]
+  (fn [^Class klz]
     (and klz (get (merge @#'print-handlers extra-handlers)
                   (symbol (.getName klz))))))