Skip to content

Instantly share code, notes, and snippets.

@alexott

alexott/persons-example.clj

Created August 27, 2010 08:15
Show Gist options
  • Save alexott/553031 to your computer and use it in GitHub Desktop.
Save alexott/553031 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
persons-example.clj
;; use of defrecords for https://jukkaz.wordpress.com/2010/08/26/age-discrimination-with-clojure/
(defrecord Person [name age])
(def persons1
[(Person. "Boris" 40)
(Person. "Betty" 32)
(Person. "Bambi" 17)])
(let [[minors majors] (separate #(<= (:age %) 18) persons1)]
(println minors)
(println majors))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment