mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-15 02:00:22 +02:00
Code Activity

Update autoconf-managed cpp symbol HAVE_ST_BLKSIZE

Browse source 
to HAVE_STRUCT_STAT_ST_BLKSIZE.

(scm_fport_buffer_add): Update autoconf-managed cpp
symbol HAVE_ST_BLKSIZE to HAVE_STRUCT_STAT_ST_BLKSIZE.
This commit is contained in:
Thien-Thi Nguyen 2002-02-09 23:39:04 +00:00
parent 6ca50d4204
commit a4ec214b8d
1 changed files with 17 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/fports.c
View file

@ -60,7 +60,7 @@
#else
scm_sizet fwrite ();
#endif
#ifdef HAVE_ST_BLKSIZE
#ifdef HAVE_STRUCT_STAT_ST_BLKSIZE
#include <sys/stat.h>
#endif
@ -83,7 +83,7 @@ scm_fport_buffer_add (SCM port, int read_size, int write_size)
if (read_size == -1 || write_size == -1)
{
int default_size;
#ifdef HAVE_ST_BLKSIZE
#ifdef HAVE_STRUCT_STAT_ST_BLKSIZE
struct stat st;
default_size = (fstat (fp->fdes, &st) == -1) ? default_buffer_size