On Mon, Sep 27, 2010 at 8:13 PM, Alexander Gavrilov <angavri...@gmail.com>wrote:

>
> > (defun test ()
>    (let ((a 5))
>      (declare (special a))
>      (flet ((x () a))
>        (let ((a 10))
>          (x)))))
>
> > (test)
> 5
>
> > (compile 'test)
>
> > (test)
> 10
>

Nice catch. Due to firewall problems I cannot push it into CVS until I
return home in some days.

Juanjo

-- 
Instituto de FĂ­sica Fundamental, CSIC
c/ Serrano, 113b, Madrid 28006 (Spain)
http://juanjose.garciaripoll.googlepages.com
------------------------------------------------------------------------------
Start uncovering the many advantages of virtual appliances
and start using them to simplify application deployment and
accelerate your shift to cloud computing.
http://p.sf.net/sfu/novell-sfdev2dev
_______________________________________________
Ecls-list mailing list
Ecls-list@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/ecls-list

Reply via email to