Quines
5 views
Skip to first unread message
Kei Suzuki
Mar 17, 2010, 8:08:19 AM3/17/10
to Clojure
((fn[](let[s "](print\"((fn[](let[s\"(pr-str s)s))))" ](print"((fn[]
(let[s"(pr-str s)s))))
(let[s"(pr-str s)s))))
(let[s "](print\"(let[s\"(pr-str s)s))" ](print"(let[s"(pr-str s)s))
(def s"(def s%s)(printf s(pr-str s))")(printf s(pr-str s))
Any others?
yubeshi
Mar 17, 2010, 11:15:25 PM3/17/10
to Clojure
Ok, I golfed it.
(def s["(def s%s)(printf(s 0)s)"])(printf(s 0)s)
(def s["(def s%s)(printf(s 0)s)"])(printf(s 0)s)
Reply all
Reply to author
Forward
0 new messages