This is the mail archive of the
guile-cvs@sourceware.cygnus.com
mailing list for the Guile project.
guile/guile-core/libguile fports.c init.c ioex ...
- To: guile-cvs at sourceware dot cygnus dot com
- Subject: guile/guile-core/libguile fports.c init.c ioex ...
- From: ghouston at sourceware dot cygnus dot com
- Date: 12 Mar 2000 19:58:57 -0000
CVSROOT: /cvs/guile
Module name: guile
Changes by: ghouston@sourceware.cygnus.com 00/03/12 11:58:57
Modified files:
guile-core/libguile: fports.c init.c ioext.c throw.c
Log message:
* fports.c (scm_fdes_to_port): call fcntl F_GETFL to test that
the fdes is valid before doing anything else. check that
the file descriptor supports the modes required.
(scm_fport_buffer_add): don't throw an error if fstat doesn't
work: just use the default buffer size.
* throw.c: change an outdated comment about scm_internal_catch
BODY: it doesn't take a jumpbuf arg.
* init.c (scm_standard_stream_to_port): install a handler in case
scm_fdes_to_port throws an error. don't check here whether the
file descriptor is valid, since scm_fdes_to_port will do that.
set the revealed count depending on whether the port got the
standard file descriptor.
(stream_body_data): new type.
(stream_body, stream_handler): new procs.