mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-05-20 19:50:24 +02:00
2000-02-09 Gary Houston <ghouston@arglist.com>
* init.c (scm_init_standard_ports): when stdout is a tty, make the current-output-port unbuffered by default. this is less confusing for interactive use. it was line-buffered because of a performance problem with unbuffered ports, but I think it will be OK now.
This commit is contained in:
parent
43ff3170df
commit
720e869247
2 changed files with 9 additions and 1 deletions
|
@ -1,3 +1,11 @@
|
||||||
|
2000-02-09 Gary Houston <ghouston@arglist.com>
|
||||||
|
|
||||||
|
* init.c (scm_init_standard_ports): when stdout is a tty, make the
|
||||||
|
current-output-port unbuffered by default. this is less confusing
|
||||||
|
for interactive use. it was line-buffered because of a
|
||||||
|
performance problem with unbuffered ports, but I think it will be
|
||||||
|
OK now.
|
||||||
|
|
||||||
2000-02-08 Gary Houston <ghouston@arglist.com>
|
2000-02-08 Gary Houston <ghouston@arglist.com>
|
||||||
|
|
||||||
* __scm.h: don't define long_long or ulong_long if HAVE_LONG_LONGS
|
* __scm.h: don't define long_long or ulong_long if HAVE_LONG_LONGS
|
||||||
|
|
|
@ -280,7 +280,7 @@ scm_init_standard_ports ()
|
||||||
isatty (0) ? "r0" : "r",
|
isatty (0) ? "r0" : "r",
|
||||||
"standard input");
|
"standard input");
|
||||||
scm_def_outp = scm_standard_stream_to_port (1,
|
scm_def_outp = scm_standard_stream_to_port (1,
|
||||||
isatty (1) ? "wl" : "w",
|
isatty (1) ? "w0" : "w",
|
||||||
"standard output");
|
"standard output");
|
||||||
scm_def_errp = scm_standard_stream_to_port (2,
|
scm_def_errp = scm_standard_stream_to_port (2,
|
||||||
isatty (2) ? "w0" : "w",
|
isatty (2) ? "w0" : "w",
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue