* libguile/posix.c (scm_init_posix): Define (in Scheme)
AT_REMOVEDIR and AT_EACCESS when defined (in C).
---
libguile/posix.c | 6 ++++++
1 file changed, 6 insertions(+)
diff --git a/libguile/posix.c b/libguile/posix.c
index bd7f40ca8..a6f7c9a0d 100644
--- a/libguile/posix.c
+++ b/libguile/posix.c
@@ -2503,6 +2503,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"
--
2.30.2