[elephant-cvs] CVS update: elephant/src/sleepycat.lisp

[Robert L. Read]

Update of /project/elephant/cvsroot/elephant/src
In directory common-lisp.net:/tmp/cvs-serv20325/src

Modified Files:
	sleepycat.lisp 
Log Message:
Removing debugging statements.

Date: Mon Dec  5 16:27:54 2005
Author: rread

Index: elephant/src/sleepycat.lisp
diff -u elephant/src/sleepycat.lisp:1.15 elephant/src/sleepycat.lisp:1.16
--- elephant/src/sleepycat.lisp:1.15	Mon Dec  5 16:08:35 2005
+++ elephant/src/sleepycat.lisp	Mon Dec  5 16:27:54 2005
@@ -545,7 +545,6 @@
  	   (type array-or-pointer-char d)
  	   (type fixnum do so l)
  	   (type string s))
-;;  (format t "copy-str-to-buf s = ~A do =~a so=~A  len=~A~%" s do so l)
   (%copy-str-to-buf d do 
 		    #+sbcl
 		    (sb-sys:vector-sap s) 
@@ -661,7 +660,6 @@
   (declare (optimize (speed 3) (safety 0))
 	   (type buffer-stream bs)
 	   (type (unsigned-byte 8) b))
-;;  (format t "BW-byte ~A~%" b)
   (with-struct-slots ((buf buffer-stream-buffer)
 		      (size buffer-stream-size)
 		      (len buffer-stream-length))