Skip to content

Instantly share code, notes, and snippets.

@amalloy

amalloy/macro.clj

Forked from sritchie/macro.clj
Created March 31, 2011 06:08
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 amalloy/895897 to your computer and use it in GitHub Desktop.
Save amalloy/895897 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
macro.clj
(defmacro phase-fn
([argvec] identity)
([argvec subphase & left]
`(fn [session# ~@argvec]
(--> session#
~subphase
~@(when left
[`((phase-fn ~argvec ~@left))])))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment