[cl-sqlite-devel] trivial patch to remove warning

[Antony]

Hi

Would you mind applying the following patch if it's ok.

Thanks,
-Antony

--- /home/antony/cl-sqlite/cache.lisp        2010-12-11 
09:14:58.129838000 -0800
+++ cl-sqlite/cache.lisp        2010-12-11 09:26:02.172819100 -0800
@@ -53,6 +53,7 @@

  (defun purge-cache (cache)
    (iter (for (id items) in-hashtable (objects-table cache))
+        (declare (ignorable id))
          (when items
            (iter (for item in-vector (the vector items))
                  (funcall (destructor cache) item)))))
\ No newline at end of file