Author: hhubner Date: Fri May 9 04:37:58 2008 New Revision: 14 Modified: branches/hans/input.lisp Log: remove debug print Modified: branches/hans/input.lisp ============================================================================== --- branches/hans/input.lisp (original) +++ branches/hans/input.lisp Fri May 9 04:37:58 2008 @@ -338,7 +338,6 @@ #'read-char-code #'unread-char-code) until (eql char :eof) - do (format t "char ~S~%" char) do (vector-push char string)) string)))))))