Torvaney/infix.clj

Created June 5, 2018 11:26

Star () You must be signed in to star a gist
Fork () You must be signed in to fork a gist

Learn more about clone URLs
Clone this repository at <script src="https://gist.github.com/Torvaney/911a4d5b631bbf584b38dcb6cc44aaa9.js"></script>
Save Torvaney/911a4d5b631bbf584b38dcb6cc44aaa9 to your computer and use it in GitHub Desktop.

Download ZIP

Infix functions in clojure

Raw

	(defmacro $
	([x] x)
	([f x] `(~f ~x))
	([x f & args] `(~f ($ ~x) ($ ~@args))))

	;; Examples
	($ 1 + 5)
	; 6

	($ 1 + 5 + 2)
	; 8

	($ 1 + 5 - 2)
	; 4

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment