Skip to content

Instantly share code, notes, and snippets.

Created April 21, 2016 07:34
What would you like to do?
A brief example of protocols and records in Clojure
;; A protocol with a single method
(defprotocol Waggable
(wag [x]))
;; A record that implements that protocol
(defrecord Dog [name]
(wag [x]
(prn (str (:name x)
" wagged their tail"))))
;; Call that method
(wag (->Dog "Derek"))
;; A record that doesn't implement the protocol
(defrecord Cat [name])
;; Extended to implement the protocol
(extend-protocol Waggable
(wag [x]
(prn "Cats don't wag")))
;; And then call that method
(wag (->Cat "Arnold"))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment