[cl-containers-devel] Problems with priority queues

[Josip Gracin]

Hi!

Hate to be the one who always carries bad news, but... :-)  Here's a 
test that fails with an exception in delete-first.  Cl-containers fresh 
from asdf-install, SBCL 1.0.7.19.


(addtest (test-priority-queue-on-container)
   add-and-delete-first
   (let ((c (make-container 'priority-queue-on-container)))
     (insert-item c 2)
     (insert-item c 1)
     (insert-item c 3)
     (delete-first c)
     (ensure-same (size c) 2 :test '=)
     (ensure-same (first-element c) 2)))


Cheers!