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

Crib not on dirfd.m4 if we need/want dirfd everywhere in the future.

Browse source
This commit is contained in:
Kevin Ryde 2006-09-23 01:43:59 +00:00
parent c82f332e1e
commit 49acac79a1
1 changed files with 4 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

6
libguile/filesys.c
View file

@ -203,9 +203,11 @@ void *alloca (size_t);
/* dirfd() returns the file descriptor underlying a "DIR*" directory stream. /* dirfd() returns the file descriptor underlying a "DIR*" directory stream.
Found on MacOS X for instance. The following definition is for Solaris Found on MacOS X for instance. The following definition is for Solaris
10, it's probably not right elsewhere, but that's ok, it shouldn't be 10, it's probably not right elsewhere, but that's ok, it shouldn't be
used elsewhere. */ used elsewhere. Crib note: If we need more then gnulib has a dirfd.m4
figuring out how to get the fd (dirfd function, dirfd macro, dd_fd field,
or d_fd field). */
#ifndef dirfd #ifndef dirfd
#define dirfd(dirstream) (dirstream->dd_fd) #define dirfd(dirstream) ((dirstream)->dd_fd)
#endif #endif