Skip to content

Instantly share code, notes, and snippets.

@JonathanSmith

JonathanSmith/with-?

Created December 30, 2009 18:37
Show Gist options
  • Save JonathanSmith/266274 to your computer and use it in GitHub Desktop.
Save JonathanSmith/266274 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
with-?
If you look at test_macro.lfe
(defmacro let@
(((vb . vbs) . b) `(let (,vb) (let@ ,vbs . ,b)))
((() . b) `(begin . ,b)))
(defsyntax let&
([(vb . vbs) . b] [let (vb) (let& vbs . b)])
([() . b] [begin . b]))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment