Skip to content

Instantly share code, notes, and snippets.

@kindlychung

kindlychung/all.clj Secret

Created May 8, 2015 15:18
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save kindlychung/8423af12c554e0abdf66 to your computer and use it in GitHub Desktop.
Save kindlychung/8423af12c554e0abdf66 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
all.clj
(defmacro all [args]
`(boolean (and ~@args)))
(defmacro any [args]
`(boolean (or ~@args)))
(defmacro all1 [& args]
`(boolean (and ~@args)))
(defmacro any1 [& args]
`(boolean (or ~@args)))
(all (take 1000 (repeat 10)))
(all (repeat nil))
(any (repeat 3))
(any (repeat 5))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment