diff options
-rw-r--r-- | reentr.c | 2 | ||||
-rw-r--r-- | regen/reentr.pl | 2 |
2 files changed, 4 insertions, 0 deletions
@@ -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; diff --git a/regen/reentr.pl b/regen/reentr.pl index 6dac2996ad..e4cbde3bf2 100644 --- a/regen/reentr.pl +++ b/regen/reentr.pl @@ -945,8 +945,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; |