From 24028e75ca6c184051ee9543ceefeefe628c025b Mon Sep 17 00:00:00 2001 From: Maxime Devos Date: Tue, 16 Nov 2021 11:06:30 +0000 Subject: Define AT_REMOVEDIR and others when available. MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * libguile/posix.c (scm_init_posix): Define (in Scheme) AT_REMOVEDIR and AT_EACCESS when defined (in C). Signed-off-by: Ludovic Courtès --- libguile/posix.c | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/libguile/posix.c b/libguile/posix.c index 879aeb7e7..b5352c2c4 100644 --- a/libguile/posix.c +++ b/libguile/posix.c @@ -2528,6 +2528,12 @@ scm_init_posix () #ifdef AT_EMPTY_PATH scm_c_define ("AT_EMPTY_PATH", scm_from_int (AT_EMPTY_PATH)); #endif +#ifdef AT_REMOVEDIR + scm_c_define ("AT_REMOVEDIR", scm_from_int (AT_REMOVEDIR)); +#endif +#ifdef AT_EACCESS + scm_c_define ("AT_EACCESS", scm_from_int (AT_EACCESS)); +#endif #include "cpp-SIG.c" #include "posix.x" -- cgit v1.2.1