Integrate mainline
[p5sagit/p5-mst-13.2.git] / pp_sys.c
index 4760210..941760b 100644 (file)
--- 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