From 91b82383873b46385d239f2b059f353b11f07e0f Mon Sep 17 00:00:00 2001 From: Herbert Valerio Riedel Date: Sun, 31 Jan 2016 00:43:21 +0100 Subject: Replace `__hsunix_getpw{nam,uid_r}` wrappers with CApiFFI --- cbits/HsUnix.c | 18 ------------------ 1 file changed, 18 deletions(-) (limited to 'cbits') diff --git a/cbits/HsUnix.c b/cbits/HsUnix.c index aec5368..d689a6e 100644 --- a/cbits/HsUnix.c +++ b/cbits/HsUnix.c @@ -16,24 +16,6 @@ void *__hsunix_rtldNext (void) {return RTLD_NEXT;} void *__hsunix_rtldDefault (void) {return RTLD_DEFAULT;} #endif -#if HAVE_GETPWNAM_R -// getpwnam_r is a macro on some platforms, so we need a wrapper: -int __hsunix_getpwnam_r(const char *name, struct passwd *pw, char *buffer, - size_t buflen, struct passwd **result) -{ - return getpwnam_r(name, pw, buffer, buflen, result); -} -#endif - -#ifdef HAVE_GETPWUID_R -// getpwuid_r is a macro on some platforms, so we need a wrapper: -int __hsunix_getpwuid_r(uid_t uid, struct passwd *pw, char *buffer, - size_t buflen, struct passwd **result) -{ - return getpwuid_r(uid, pw, buffer, buflen, result); -} -#endif - #ifdef HAVE_PTSNAME // On Linux (and others), needs to be included while // `_XOPEN_SOURCE` is already defined. However, GHCs before GHC 8.0 -- cgit v1.2.3