From mboxrd@z Thu Jan 1 00:00:00 1970 From: ghouston@sourceware.cygnus.com To: guile-cvs@sourceware.cygnus.com Subject: guile/guile-core/libguile fports.c init.c ioex ... Date: Sun, 12 Mar 2000 11:58:00 -0000 Message-id: <20000312195857.25818.qmail@sourceware.cygnus.com> X-SW-Source: 2000-q1/msg00323.html List-Id: 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.