From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Mon, 18 Mar 2002 19:08:32 +0000 (+0000)
Subject: Someone (*cough* *cough*) stole VMS' getpwent prototype.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c2a8f79047c4fc9379fd24944efc55cf5e791067;p=p5sagit%2Fp5-mst-13.2.git

Someone (*cough* *cough*) stole VMS' getpwent prototype.
(Fix from Craig Berry)

p4raw-id: //depot/perl@15304
---

diff --git a/pp_sys.c b/pp_sys.c
index 4760210..941760b 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -82,6 +82,8 @@ extern int h_errno;
 # ifdef HAS_GETPWENT
 #ifndef getpwent
   struct passwd *getpwent (void);
+#elif defined (VMS) && defined (my_getpwent)
+  struct passwd *Perl_my_getpwent (void);
 #endif
 # endif
 #endif