[elephant-cvs] CVS elephant/src/elephant

[ieslick]

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

Modified Files:
	serializer2.lisp 
Log Message:
Enable use of %bignum-ref under sbcl; update TODO list and roadmap

--- /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/02/04 04:34:57	1.12
+++ /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/02/05 00:32:27	1.13
@@ -328,9 +328,11 @@
        do
 	 #+(or cmu sbcl allegro)
 	 (progn (setf (cdr byte-spec) (* 32 i))
-		(buffer-write-uint (ldb byte-spec num) bs)) ;; (%bignum-ref num i) bs)
+		(%bignum-ref num i) bs)
+;;		(buffer-write-uint (ldb byte-spec num) bs)) 
 	 #+(or lispworks openmcl)
-	 (buffer-write-uint (ldb (byte 32 (* 32 i)) num) bs))))
+	 (buffer-write-uint (ldb (byte 32 (* 32 i)) num) bs)
+	 )))
 
 ;;;
 ;;; DESERIALIZER