[elephant-cvs] CVS elephant

[ieslick]

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

Modified Files:
	TODO elephant.asd 
Log Message:
Fixed bug from last checkin; implemented abstraction for fast-locks for systems that have such a thing (such as without-interrupts in non-parallel lisps)

--- /project/elephant/cvsroot/elephant/TODO	2007/02/02 23:51:58	1.40
+++ /project/elephant/cvsroot/elephant/TODO	2007/02/03 00:57:33	1.41
@@ -7,9 +7,6 @@
 --------------------------------------------
 
 Active tasks:
-- Support locks in serializer for all systems
-  - Provide support for fast and slow critical sections by lisps: buffer-streams, 
-    circularity-arrays/hashes, shared controller side-effects... (see email)
 - Trace all paths to db-put or db-delete and ensure that there is a check or a 
   default ensure-transaction around the primitive components - write a document 
   clarifying transaction design & assumptions in the backend]
@@ -64,6 +61,9 @@
 ----------------------------------
 
 Feburary 2nd, 2007 checkins:
+x Support locks in serializer for all systems
+  x Provide support for fast and slow critical sections by lisps: buffer-streams, 
+    circularity-arrays/hashes, shared controller side-effects... (see email)
 x Check for manual & automatic transactions running concurrently
 x Modify *current-transaction* to be null on default, allowing backends to choose the default format (vs. +NULL-VOID+)
 x Update BDB backend to properly provide result
--- /project/elephant/cvsroot/elephant/elephant.asd	2007/01/29 15:15:04	1.25
+++ /project/elephant/cvsroot/elephant/elephant.asd	2007/02/03 00:57:33	1.26
@@ -155,15 +155,19 @@
   :components
   ((:module :src
 	    :components
-	    ((:module memutil
+	    ((:module utils
+		      :components
+		      ((:file "package")
+		       (:file "locks")))
+	     (:module memutil
 		      :components
 		      ((:elephant-c-source "libmemutil")
 		       (:file "memutil"))
-		      :serial t)
+		      :serial t
+		      :depends-on (utils))
 	     (:module elephant
 		      :components
 		      ((:file "package")
-		       (:file "cross-platform")
 		       #+cmu (:file "cmu-mop-patches")
 		       #+openmcl (:file "openmcl-mop-patches")
 		       (:file "variables")
@@ -182,6 +186,6 @@
 		       (:file "migrate")
 		       (:file "backend"))
 		      :serial t
-		      :depends-on (memutil)))))
+		      :depends-on (memutil utils)))))
   :depends-on (:uffi :cl-base64))