[elephant-cvs] CVS elephant/src/elephant

ieslick ieslick at common-lisp.net
Wed Jan 31 20:05:38 UTC 2007


Update of /project/elephant/cvsroot/elephant/src/elephant
In directory clnet:/tmp/cvs-serv24260/src/elephant

Modified Files:
	collections.lisp controller.lisp serializer2.lisp 
Log Message:
Upgrade to BDB 4.5; green on Allegro 8.0/Mac OS X

--- /project/elephant/cvsroot/elephant/src/elephant/collections.lisp	2006/06/19 01:03:30	1.5
+++ /project/elephant/cvsroot/elephant/src/elephant/collections.lisp	2007/01/31 20:05:38	1.6
@@ -135,7 +135,6 @@
 (defmethod remove-kv (key (bt btree-index))
   "Remove a key / value from the PRIMARY by a secondary
 lookup, updating ALL other secondary indices."
-  (declare (optimize (speed 3)))
   (remove-kv (get-primary-key key bt) (primary bt)))
 
 
--- /project/elephant/cvsroot/elephant/src/elephant/controller.lisp	2007/01/26 14:41:13	1.25
+++ /project/elephant/cvsroot/elephant/src/elephant/controller.lisp	2007/01/31 20:05:38	1.26
@@ -139,7 +139,7 @@
 ;;
 
 (defclass store-controller ()
-  ((spec :type (or pathname string (simple-array character))
+  ((spec :type list
 	 :accessor controller-spec
 	 :initarg :spec
 	 :documentation "Backend create functions should pass in :spec during make-instance")
--- /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/01/25 18:18:00	1.6
+++ /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/01/31 20:05:38	1.7
@@ -20,7 +20,7 @@
   (:use :cl :elephant :elephant-memutil)
   (:import-from :elephant 
 		*circularity-initial-hash-size*
-		*resourced-byte-spec*
+		#+(or cmu sbcl allegro)
 		get-cached-instance
 		controller-symbol-cache 
 		controller-symbol-id-cache




More information about the Elephant-cvs mailing list