瀏覽代碼

remove mistakenly commited FORMAT invocations

avodonosov 16 年之前
父節點
當前提交
c2afe56f00
共有 1 個文件被更改,包括 0 次插入2 次删除
  1. 0 2
      mixin.lisp

+ 0 - 2
mixin.lisp

@@ -155,9 +155,7 @@
 (progn
   (defmethod gray:stream-read-sequence
     ((s trivial-gray-stream-mixin) seq &optional start end)
-    (format t "trivial-read~%")
     (stream-read-sequence s seq (or start 0) (or end (length seq))))
   (defmethod gray:stream-write-sequence
     ((s trivial-gray-stream-mixin) seq &optional start end)
-    (format t "trivial-write~%")
     (stream-write-sequence s seq (or start 0) (or end (length seq)))))