On Mon, Sep 27, 2010 at 8:13 PM, Alexander Gavrilov <span dir="ltr"><<a href="mailto:angavrilov@gmail.com">angavrilov@gmail.com</a>></span> wrote:<br><div class="gmail_quote"><blockquote class="gmail_quote" style="margin: 0pt 0pt 0pt 0.8ex; border-left: 1px solid rgb(204, 204, 204); padding-left: 1ex;">

<br>
> (defun test ()<br>
    (let ((a 5))<br>
      (declare (special a))<br>
      (flet ((x () a))<br>
        (let ((a 10))<br>
          (x)))))<br>
<br>
> (test)<br>
5<br>
<br>
> (compile 'test)<br>
<br>
> (test)<br>
10<br>
</blockquote></div><br>Nice catch. Due to firewall problems I cannot push it into CVS until I return home in some days.<br><br>Juanjo<br clear="all"><br>-- <br>Instituto de Física Fundamental, CSIC<br>c/ Serrano, 113b, Madrid 28006 (Spain) <br>

<a href="http://juanjose.garciaripoll.googlepages.com">http://juanjose.garciaripoll.googlepages.com</a><br>