This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perly.c: Disarm the YYDEBUG defines in perly.h
[perl5.git] / perly.c
diff --git a/perly.c b/perly.c
index 0f1b7a8..d17f19b 100644 (file)
--- a/perly.c
+++ b/perly.c
 
 #include "EXTERN.h"
 #define PERL_IN_PERLY_C
-
-#ifdef DEBUGGING
-#  define YYDEBUG 1
-#else
-#  define YYDEBUG 0
-#endif
-
 #include "perl.h"
 
 typedef unsigned char yytype_uint8;
@@ -45,6 +38,15 @@ typedef signed char yysigned_char;
 /* YYINITDEPTH -- initial size of the parser's stacks.  */
 #define YYINITDEPTH 200
 
+#ifdef YYDEBUG
+#  undef YYDEBUG
+#endif
+#ifdef DEBUGGING
+#  define YYDEBUG 1
+#else
+#  define YYDEBUG 0
+#endif
+
 #ifndef YY_NULL
 # define YY_NULL 0
 #endif