<div dir="ltr">Поправил <a href="http://ru.wikipedia.org/wiki/Куайн_%28программирование%29#.D0.9B.D0.B8.D1.81.D0.BF">квайн для Lisp из википедии</a> под Scheme (guile-1.8) с форматированным выводом:<br><br><span style="font-family:courier new,monospace">$ guile quine.scm<br>

(use-modules (ice-9 pretty-print))<br>((lambda (x)<br>   (pretty-print<br>     &#39;(use-modules (ice-9 pretty-print)))<br>   (pretty-print (list x (list (quote quote) x))))<br> &#39;(lambda (x)<br>    (pretty-print<br>      &#39;(use-modules (ice-9 pretty-print)))<br>

    (pretty-print (list x (list (quote quote) x)))))</span><br><div><div><div style id="__af745f8f43-e961-4b88-8424-80b67790c964__"></div></div></div><div class="gmail_extra"><br><br>-- <br><div dir="ltr">Sin (Sinelnikov Evgeny)<br>

Etersoft<div></div><div></div><div></div><div></div><div></div><div></div><div></div><div></div><div></div></div>
</div></div>