diff --git a/src/honeysql/format.clj b/src/honeysql/format.clj
index 1f3e6e7..8fdd27a 100644
--- a/src/honeysql/format.clj
+++ b/src/honeysql/format.clj
@@ -314,16 +314,17 @@
         sql-str)))
   nil
   (-to-sql [x] "NULL")
+  SqlParam
+  (-to-seql [x]
+    (let [pname (param-name x)]
+      (if (map? @*input-params*)
+        (add-param pname (get @*input-params* pname))
+        (let [x (first @*input-params*)]
+          (swap! *input-params* rest)
+          (add-param pname x)))))
   Object
   (-to-sql [x]
-    (if (instance? SqlParam x)
-      (let [pname (param-name x)]
-        (if (map? @*input-params*)
-          (add-param pname (get @*input-params* pname))
-          (let [x (first @*input-params*)]
-            (swap! *input-params* rest)
-            (add-param pname x))))
-      (add-anon-param x))))
+    (add-anon-param x)))
 
 (defn sqlable? [x]
   (satisfies? ToSql x))