[elephant-cvs] CVS elephant/src/elephant

ieslick ieslick at common-lisp.net
Thu Feb 22 20:19:58 UTC 2007


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

Modified Files:
	classindex.lisp package.lisp serializer1.lisp 
Log Message:
Bug fix in drop instances; preliminary cygwin build in asd fils

--- /project/elephant/cvsroot/elephant/src/elephant/classindex.lisp	2007/02/21 06:29:31	1.22
+++ /project/elephant/cvsroot/elephant/src/elephant/classindex.lisp	2007/02/22 20:19:57	1.23
@@ -454,7 +454,7 @@
     (do-subsets (subset 500 instances)
       (ensure-transaction (:store-controller sc)
 	(mapc (lambda (instance)
-		(remove-kv (oid instance) (find-class-index (class-of instance)))
-		(drop-pobject instance))
+		(drop-pobject instance)
+		(remove-kv (oid instance) (find-class-index (class-of instance))))
 	      subset)))))
        
--- /project/elephant/cvsroot/elephant/src/elephant/package.lisp	2007/02/21 04:47:42	1.16
+++ /project/elephant/cvsroot/elephant/src/elephant/package.lisp	2007/02/22 20:19:57	1.17
@@ -37,6 +37,7 @@
 	   #:controller-fast-symbols-p
 	   #:optimize-layout
 	   #:get-user-configuration-parameter
+	   #:database-version
 
 	   #:upgrade
 
--- /project/elephant/cvsroot/elephant/src/elephant/serializer1.lisp	2007/02/21 04:47:42	1.10
+++ /project/elephant/cvsroot/elephant/src/elephant/serializer1.lisp	2007/02/22 20:19:57	1.11
@@ -25,7 +25,6 @@
   (:import-from :sb-bignum
 		%bignum-ref)
   (:import-from :elephant 
-		*resourced-byte-spec*
 		get-cached-instance
 		slot-definition-allocation
 		slot-definition-name




More information about the Elephant-cvs mailing list