[cl-containers-devel] Possible RB-Tree bug in latest release

[Gary King]

Hi Modius,

I have fixed the code but wasn't able to upload it to common-lisp.net  
today (server problems, I think). I'll let you know when the fix does  
go out.

thanks,

On Mar 18, 2007, at 1:53 AM, Modius Roman wrote:

>
> I apologize in advance if I am misusing the library.
>
> I'm running in Win32 on Lispworks with a bunch of dependencies  
> loaded through ASDF.
>
> I have the GZipped Tar file referenced on the CL-Containers  
> download page.
>
>
> Easy repetition of the bug:
>
> (setf m (make-instance 'Red-Black-Tree))
> (insert-item m 31)
> (size m) ; returns 1 as expected
> (delete-item m 31)
> (size m)  ; Should return 0, returns 1 instead.
> (collect-elements m)
>
> Size returns 1, element list is empty.  Size never decrements - put  
> insert/delete in a loop of a million, size will become a million.
>
> Replace the top line with
> (setf m (make-instance 'binary-search-tree))
>
> And the size goes up and down with insert/delete, as expected.
>
>
> I'd chase it down; but my lisp isn't incredibly strong and I figure  
> the authors could track this down in 5 minutes. . . .
>
>
> Thanks,
> Matt
>
>
>
> _______________________________________________
> cl-containers-devel mailing list
> cl-containers-devel at common-lisp.net
> http://common-lisp.net/cgi-bin/mailman/listinfo/cl-containers-devel

--
Gary Warren King, metabang.com
Cell: (413) 885 9127
Fax: (206) 338-4052
gwkkwg on Skype * garethsan on AIM




-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://mailman.common-lisp.net/pipermail/cl-containers-devel/attachments/20070319/ec93cd10/attachment.html>