diff options
Diffstat (limited to 'libguile/posix.c')
-rw-r--r-- | libguile/posix.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/libguile/posix.c b/libguile/posix.c index c763f4da8..048ac55bc 100644 --- a/libguile/posix.c +++ b/libguile/posix.c @@ -207,7 +207,7 @@ scm_pipe () } - +#ifdef HAVE_GETGROUPS SCM_PROC (s_getgroups, "getgroups", 0, 0, 0, scm_getgroups); SCM @@ -240,7 +240,7 @@ scm_getgroups() return ans; } } - +#endif SCM_PROC (s_getpwuid, "getpw", 0, 1, 0, scm_getpwuid); @@ -299,7 +299,7 @@ scm_getpwuid (user) } - +#ifdef HAVE_SETPWENT SCM_PROC (s_setpwent, "setpw", 0, 1, 0, scm_setpwent); SCM @@ -312,6 +312,7 @@ scm_setpwent (arg) setpwent (); return SCM_UNSPECIFIED; } +#endif @@ -572,6 +573,7 @@ scm_seteuid (id) return SCM_UNSPECIFIED; } +#ifdef HAVE_SETEGID SCM_PROC (s_setegid, "setegid", 1, 0, 0, scm_setegid); SCM @@ -591,6 +593,7 @@ scm_setegid (id) return SCM_UNSPECIFIED; } +#endif SCM_PROC (s_getpgrp, "getpgrp", 0, 0, 0, scm_getpgrp); SCM |