Simply grow string port buffers geometrically.
authorLudovic Courtès <ludo@gnu.org>
Sun, 6 Mar 2011 13:31:28 +0000 (14:31 +0100)
committerLudovic Courtès <ludo@gnu.org>
Sun, 6 Mar 2011 22:05:00 +0000 (23:05 +0100)
commitd8f1c2162c3a34f4bc29ee7f6fab426e6e11e36a
tree9d0203dd2966c94f26bb15b75307f2c1a47104ae
parent0b2c2ba353d9dcf0b288950b88d6f205a5ec67ab
Simply grow string port buffers geometrically.

* libguile/strports.c (SCM_WRITE_BLOCK): Remove.
  (st_flush): Multiply `pt->write_buf_size' by 2.
  (st_seek): Likewise when TARGET == PT->write_buf_size.
libguile/strports.c