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))