#408: SYSTEM::STREAM-CHARPOS does not return correct column for stream ---------------------------+----------------------- Reporter: mevenson | Owner: Type: defect | Status: new Priority: major | Milestone: 1.4.0 Component: (A)MOP | Version: 1.4.0-dev Resolution: | Keywords: streams Parent Tickets: | ---------------------------+----------------------- Description changed by mevenson:

Old description:

Stas reports in http://article.gmane.org/gmane.lisp.armedbear.devel/3588:

{{{ (let ((stream (make-synonym-stream '*standard-output*))) (write-char #\c stream) (system::stream-charpos stream)) }}}} Returns {{{ => 0 }}} whereas the output should be advanced by one.

New description:

Stas reports in http://article.gmane.org/gmane.lisp.armedbear.devel/3588: This does not seem to emit a newline: {{{ (let ((stream (make-synonym-stream '*standard-output*))) (write-string "abc" stream) (fresh-line stream) (write-string "abc" stream)) }}}

This does not seem to return the correct character position: {{{ (let ((stream (make-synonym-stream '*standard-output*))) (write-char #\c stream) (system::stream-charpos stream)) }}} as it returns {{{ => 0 }}} whereas the output should be advanced by one.

--

-- Ticket URL: http://abcl.org/trac/ticket/408#comment:1 armedbear http://abcl.org armedbear

#408: SYSTEM::STREAM-CHARPOS and CL:FRESH-LINE problems with SYNONYM-STREAM ---------------------------+----------------------- Reporter: mevenson | Owner: Type: defect | Status: new Priority: major | Milestone: 1.4.0 Component: (A)MOP | Version: 1.4.0-dev Resolution: | Keywords: streams Parent Tickets: | ---------------------------+-----------------------

-- Ticket URL: http://abcl.org/trac/ticket/408#comment:3 armedbear http://abcl.org armedbear