summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMaxime Devos <maximedevos@telenet.be>2021-11-16 11:06:30 +0000
committerLudovic Courtès <ludo@gnu.org>2022-10-21 17:40:37 +0200
commit24028e75ca6c184051ee9543ceefeefe628c025b (patch)
tree7cc1d5d2b4a7e56e95fb9e5d20551014e52a7884
parentf018e0d486b8ec6b6fc78346534f71af6216614a (diff)
downloadguile-24028e75ca6c184051ee9543ceefeefe628c025b.tar.gz
Define AT_REMOVEDIR and others when available.
* libguile/posix.c (scm_init_posix): Define (in Scheme) AT_REMOVEDIR and AT_EACCESS when defined (in C). Signed-off-by: Ludovic Courtès <ludo@gnu.org>
-rw-r--r--libguile/posix.c6
1 files changed, 6 insertions, 0 deletions
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"