This is a reimplementation of a Scheme quine. It is slightly more verbose than the Scheme version from wikipedia (<a href="http://en.wikipedia.org/wiki/Quine_(computing)#Scheme_.28also_valid_Common_Lisp.29" rel="nofollow">http://en.wikipedia.org/wiki/Quine_(computing)#Scheme_.28als...</a>) because 'quote x is expanded to (quote quote) x. Contrariwise, lisps may contract (quote quote) to 'quote, which is, for example, what Allegro CL 8.1 is doing.<p>According to <a href="http://www.nyx.net/~gthompso/self_lisp.txt" rel="nofollow">http://www.nyx.net/~gthompso/self_lisp.txt</a>, the original implementation is attributed to Chris Hruska. Other lisp implementations mentioned there tend to expand to clojure.core/seq and clojure.core/list in Clojure; expansions usually work as quines in Clojure. This is an easy exercise. :-)