#207 terminal streams and line terminators

lisp error
open
Bruno Haible
clisp (525)
5
2004-05-05
2004-05-05
Sam Steingold
No

(encoding-line-terminator
(stream-external format *terminal-io*))
is ignored

./clisp -q -norc -x "(defun p (s &aux (v (symbol-value
s))) (print s v) (print v v) (print
(stream-external-format v) v)) (p '*error-output*) (p
'*standard-output*) (mapcar (lambda (s) (cons s
(symbol-value s))) (apropos-list \"-ENCODING*\"))"
2>&1 | tee z

P^M
*ERROR-OUTPUT* ^M
#<OUTPUT UNBUFFERED FILE-STREAM CHARACTER #P"/dev/fd/2"> ^M
#<ENCODING CHARSET:ASCII :DOS>
#<ENCODING CHARSET:ASCII :DOS>
*STANDARD-OUTPUT*
#<IO SYNONYM-STREAM *TERMINAL-IO*>
#<ENCODING CHARSET:ASCII :DOS>
#<ENCODING CHARSET:ASCII :DOS>
((*DEFAULT-FILE-ENCODING* . #<ENCODING CHARSET:ASCII :DOS>)
(*FOREIGN-ENCODING* . #<ENCODING CHARSET:ASCII :DOS>)
(SYSTEM::*HTTP-ENCODING* . #<ENCODING CHARSET:UTF-8 :DOS>)
(*MISC-ENCODING* . #<ENCODING CHARSET:ASCII :DOS>)
(*PATHNAME-ENCODING* . #<ENCODING CHARSET:ASCII :DOS>)
(*TERMINAL-ENCODING* . #<ENCODING CHARSET:ASCII :DOS>))
^M

Discussion

  • Sam Steingold
    Sam Steingold
    2004-05-05

    patch that does not work