extends?

added
1.2

ns
clojure.core

type
function

(extends? protocol atype)

Returns true if atype extends protocol

                user=> (defprotocol Area (get-area [this]))
Area

user=> (defrecord Rectangle [width height]
                  Area
                  (get-area [this]
                    (* width height)))
user.Rectangle

(extends? Area Rectangle)
true