From cf255dd3a4f01da5e88c6da3738e7745ad8b9594 Mon Sep 17 00:00:00 2001 From: Maxime Devos Date: Tue, 16 Nov 2021 11:06:35 +0000 Subject: Define a Scheme binding to ‘fstatat’ when available. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * configure.ac: Detect if ‘fstatat’ is defined. * libguile/filesys.c (scm_statat): Define a Scheme binding to ‘fstatat’. * libguile/filesys.h (scm_statat): Make it part of the C API. * doc/ref/posix.texi (File System): Document it. * libguile/syscalls.h (fstatat_or_fstatat64): Choose between ‘fstatat’ and ‘fstatat64’. Signed-off-by: Ludovic Courtès --- libguile/syscalls.h | 1 + 1 file changed, 1 insertion(+) (limited to 'libguile/syscalls.h') diff --git a/libguile/syscalls.h b/libguile/syscalls.h index 30b99c193..37d532e60 100644 --- a/libguile/syscalls.h +++ b/libguile/syscalls.h @@ -65,6 +65,7 @@ # define readdir_r_or_readdir64_r readdir_r #endif #define stat_or_stat64 CHOOSE_LARGEFILE(stat,stat64) +#define fstatat_or_fstatat64 CHOOSE_LARGEFILE(fstatat,fstatat64) #define truncate_or_truncate64 CHOOSE_LARGEFILE(truncate,truncate64) #define scm_from_off_t_or_off64_t CHOOSE_LARGEFILE(scm_from_off_t,scm_from_int64) #define scm_from_ino_t_or_ino64_t CHOOSE_LARGEFILE(scm_from_ulong,scm_from_uint64) -- cgit v1.2.3