summaryrefslogtreecommitdiff
path: root/reentr.c
diff options
context:
space:
mode:
authorBrian Fraser <fraserbn@gmail.com>2014-01-22 10:17:53 -0300
committerBrian Fraser <fraserbn@gmail.com>2014-01-26 14:44:25 -0300
commit123829cf6709ebbb343f8968732df416ae326688 (patch)
tree2c7161ef7d6aa66dd15833077745ef0f00e919c7 /reentr.c
parent848ac64bdec15c679437aa9954aa33832acb28c7 (diff)
downloadperl-123829cf6709ebbb343f8968732df416ae326688.tar.gz
reentr.c: Handle systems without getpwent
Namely, Android.
Diffstat (limited to 'reentr.c')
-rw-r--r--reentr.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/reentr.c b/reentr.c
index a5ea192c54..917807c50c 100644
--- a/reentr.c
+++ b/reentr.c
@@ -431,8 +431,10 @@ Perl_reentrant_retry(const char *f, ...)
uid = va_arg(ap, Uid_t);
#endif
retptr = getpwuid(uid); break;
+#if defined(HAS_GETPWENT) || defined(HAS_GETPWENT_R)
case OP_GPWENT:
retptr = getpwent(); break;
+#endif
default:
SETERRNO(ERANGE, LIB_INVARG);
break;