From 23e6d4a5bed6ce5b14b60816ebd5bda2749c9af6 Mon Sep 17 00:00:00 2001 From: Janne Blomqvist Date: Thu, 24 Feb 2011 16:51:17 +0200 Subject: PR 47802 Test for POSIX getpwuid_r From-SVN: r170471 --- libgfortran/intrinsics/getlog.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'libgfortran/intrinsics') diff --git a/libgfortran/intrinsics/getlog.c b/libgfortran/intrinsics/getlog.c index 299ac5a..9e5c8de 100644 --- a/libgfortran/intrinsics/getlog.c +++ b/libgfortran/intrinsics/getlog.c @@ -75,7 +75,7 @@ PREFIX(getlog) (char * login, gfc_charlen_type login_len) memset (login, ' ', login_len); /* Blank the string. */ -#if defined(HAVE_GETPWUID_R) && defined(HAVE_GETEUID) +#if defined(HAVE_POSIX_GETPWUID_R) && defined(HAVE_GETEUID) struct passwd pwd; struct passwd *result; char *buf; @@ -113,7 +113,7 @@ PREFIX(getlog) (char * login, gfc_charlen_type login_len) memcpy (login, p, p_len); cleanup: -#ifdef HAVE_GETPWUID_R +#if defined (HAVE_POSIX_GETPWUID_R) && defined(HAVE_GETEUID) free (buf); #else ; -- cgit v1.1