how to check if a record implements a particular protocol?

Question

I have a protocol:

(defprotocol IInterval
  (-duration  [in]))

and a record that implements it:

(defrecord Interval [start end]
  IInterval
  (-duration  [_] (- end
                     start)))

if I create (def i1 (Interval 0 1000))

how would I be able to the method implements? where:

(implements? IInterval i1) => true

Answer 1

You can use satisfies?:

(satisfies? IInterval i1)