* ports.h, ports.c (scm_unread_string): New procedure.
authorMikael Djurfeldt <djurfeldt@nada.kth.se>
Fri, 30 Oct 1998 08:23:13 +0000 (08:23 +0000)
committerMikael Djurfeldt <djurfeldt@nada.kth.se>
Fri, 30 Oct 1998 08:23:13 +0000 (08:23 +0000)
commitee1e7e13b3ea5a81dce23bd8500837857d65ba84
tree246be058b0b8ad92cc86d79e6c054377a4560647
parent0855ef71546d4f3ed1be5bf07c8ccbb42e76e72a
* ports.h, ports.c (scm_unread_string): New procedure.
(scm_grow_port_cbuf): New function.
* ports.c (scm_add_to_port_table, scm_remove_from_port_table):
Handle new fields.
(scm_generic_fgets), fports.c (local_fgets): Use a loop
to read unread characters.  Use SCM_TRY_CLRDY instead of
SCM_CLRDY.
libguile/ports.c