Skip to content

Instantly share code, notes, and snippets.

@speedcell4

speedcell4/infix.clj

Created September 15, 2014 05:48
Show Gist options
  • Save speedcell4/e2c7aebc08e673114191 to your computer and use it in GitHub Desktop.
Save speedcell4/e2c7aebc08e673114191 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
infix.clj
(defn infix
([x op y] (op x y))
([x op y & more]
(apply infix (cons (infix x op y) more))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment