Skip to content

Instantly share code, notes, and snippets.

@frenchy64

frenchy64/hy.clj

Created September 19, 2013 23:30
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 frenchy64/6631311 to your computer and use it in GitHub Desktop.
Save frenchy64/6631311 to your computer and use it in GitHub Desktop.
Download ZIP
hy.clj
Raw
hy.clj
(-> (ast (letfn [(a [])
(b [a] a)
(c [c] a)
(a [b c] b)]
(a b c)))
ast-hy emit-hy)
;=>
((fn* ([] (letfn* [a (fn* a4844 ([] nil))
b (fn* b4846 ([a4853] a4853))
c (fn* c4848 ([c4854] a4843))
a4843 (fn* a4850 ([b4856 c4857] b4856))]
(a4843 b c)))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment