Silence ill-behaved or failing Module::Build tests on VMS.

[p5sagit/p5-mst-13.2.git] / x2p / a2p.c

diff --git a/x2p/a2p.c b/x2p/a2p.c
index 1098b1e..20e3227 100644 (file)
--- a/x2p/a2p.c
+++ b/x2p/a2p.c
@@ -2179,13 +2179,21 @@ int yyparse (void);
 #define YYREJECT goto yyabort
 #define YYACCEPT goto yyaccept
 #define YYERROR goto yyerrlab
+
+#if YYDEBUG
+#  if defined(WIN32) && !defined(__BORLANDC__)
+EXTERN_C _CRTIMP char *getenv(const char *);
+#  else
+EXTERN_C char *getenv(const char *);
+#  endif
+#endif
+
 int
 yyparse(void)
 {
     register int yym, yyn, yystate;
 #if YYDEBUG
     register char *yys;
-    extern char *getenv();
 
     if ((yys = getenv("YYDEBUG")))
     {