[elephant-cvs] CVS elephant/src/elephant

[ieslick]

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

Modified Files:
	serializer2.lisp 
Log Message:
Last of Henrik's changes

--- /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/02/08 15:51:01	1.19
+++ /project/elephant/cvsroot/elephant/src/elephant/serializer2.lisp	2007/02/08 15:58:26	1.20
@@ -165,7 +165,7 @@
 	 (%serialize (frob)
 	   (etypecase frob
 	     (fixnum 
-	      (if (< #.most-positive-fixnum +2^32+) ;; should be compiled away
+	      (if (< #.most-positive-fixnum +2^31+) ;; should be compiled away
 		  (progn
 		    (buffer-write-byte +fixnum32+ bs)
 		    (buffer-write-int32 frob bs))