diff options
| -rw-r--r-- | src/clj/clojure/core_deftype.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/clj/clojure/core_deftype.clj b/src/clj/clojure/core_deftype.clj index 4dc27d3a..7fc2a026 100644 --- a/src/clj/clojure/core_deftype.clj +++ b/src/clj/clojure/core_deftype.clj @@ -388,7 +388,7 @@ (get (find-protocol-impl protocol x) methodk)) (defn- implements? [protocol atype] - (.isAssignableFrom #^Class (:on-interface protocol) atype)) + (and atype (.isAssignableFrom #^Class (:on-interface protocol) atype))) (defn extends? "Returns true if atype extends protocol" |