From 0ddaf51316ca1bab139289c51c648ec8213a8af3 Mon Sep 17 00:00:00 2001
From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Mon, 25 Mar 2002 12:33:17 +0100
Subject: Re: what is YYDEBUG and why does it reset errno? Message-ID:
 <20020325113317.A1410@rafael>

Apparently VMS does not do YYDEBUG.

p4raw-id: //depot/perl@15486
---
 perly.y | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'perly.y')

diff --git a/perly.y b/perly.y
index 48049eb83e..6b7df9b2e8 100644
--- a/perly.y
+++ b/perly.y
@@ -16,7 +16,7 @@
 #include "EXTERN.h"
 #define PERL_IN_PERLY_C
 #include "perl.h"
-#ifdef EBCDIC
+#if defined(EBCDIC) || defined(VMS)
 #undef YYDEBUG
 #endif
 #define dep() deprecate("\"do\" to call subroutines")
-- 
cgit v1.2.1