> clojure.core/extends?
doesn't seem to cover all the use cases? or i'm mistyping (er ha ha) something?
(ns p)
(defprotocol P1 (foo [this]))
(ns d)
(deftype T1 [f] :as this p/P1 (foo [] (println this)))
(deftype T2 [f] :as this)
(extend ::T2 p/P1 {:foo (fn [this] (println this))})
(println "P1?T1" (extends? p/P1 :d/T1))
(println "P1?T2" (extends? p/P1 :d/T2))
--
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to [email protected]
Note that posts from new members are moderated - please be patient with your
first post.
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
