diff --git a/src/code/reader.lisp b/src/code/reader.lisp index 996b1f3feb22777de3af1c29612499b3dd27b32a..03f03a0ba35f27b3bf6d3713adf1ffbc4e0d3bad 100644 --- a/src/code/reader.lisp +++ b/src/code/reader.lisp @@ -62,7 +62,6 @@ (reader-error-format-arguments condition)) nil error-stream (file-position error-stream))) - (format t "open-stream-p ~A~%" (open-stream-p error-stream)) (format stream (intl:gettext "Reader error ~@[at ~D ~]on ~S:~%~?") (and (open-stream-p error-stream) (file-position error-stream))