[elephant-cvs] CVS elephant/src/elephant

[rread]

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

Modified Files:
	serializer2.lisp 
Log Message:
importing bignum reference


--- /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/02/05 00:32:27	1.13
+++ /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/02/05 01:01:26	1.14
@@ -18,6 +18,9 @@
 
 (defpackage :elephant-serializer2
   (:use :cl :elephant :elephant-memutil :elephant-utils)
+  #+(or cmu sbcl)
+  (:import-from :sb-bignum
+		%bignum-ref)
   (:import-from :elephant 
 		*circularity-initial-hash-size*
 		#+(or cmu sbcl allegro)
@@ -499,4 +502,4 @@
        do
 	 (setq num (dpb (buffer-read-uint bs) byte-spec num))
        finally 
-	 (return (if positive num (- num))))))
\ No newline at end of file
+	 (return (if positive num (- num))))))