[Ecls-list] Internal unused variable leaking through

[Juan Jose Garcia-Ripoll]

On Sun, Feb 7, 2010 at 1:04 AM, Tobias C. Rittweiler <tcr at freebits.de>wrote:

> Here is another example where internal variable usage leaks through:
>
> (defvar *thread-id-counter* 0)
>
> (defvar *thread-id-counter-lock*
>  (mp:make-lock :name "thread id counter lock"))
>
> (defun next-thread-id ()
>  (mp:with-lock (*thread-id-counter-lock*)
>    (incf *thread-id-counter*)))


An internal variable had not been declared special globally. Thanks for
pointing both errors out!

Juanjo

-- 
Instituto de Física Fundamental, CSIC
c/ Serrano, 113b, Madrid 28006 (Spain)
http://juanjose.garciaripoll.googlepages.com
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/ecl-devel/attachments/20100207/bb541218/attachment.html>