In perl.git, the branch khw/ebcdic has been updated <http://perl5.git.perl.org/perl.git/commitdiff/c31ee7b5476db170f03c828002f3d9d200feac98?hp=c53c4243dc5a3a78abe872387b9cee4b916d04a3>
- Log ----------------------------------------------------------------- commit c31ee7b5476db170f03c828002f3d9d200feac98 Author: Karl Williamson <[email protected]> Date: Wed Mar 6 21:47:21 2013 -0700 XXX: Turn off debug tracing in perly.c THis is somehow getting into lib/buildcustomize.pl ----------------------------------------------------------------------- Summary of changes: perly.c | 3 ++- 1 files changed, 2 insertions(+), 1 deletions(-) diff --git a/perly.c b/perly.c index 6839f96..a3dfe24 100644 --- a/perly.c +++ b/perly.c @@ -64,7 +64,7 @@ typedef signed char yysigned_char; #define YYERROR goto yyerrlab1 /* Enable debugging if requested. */ -#if 1 +#if 0 # define yydebug (1) @@ -339,6 +339,7 @@ Perl_yyparse (pTHX_ int gramtype) parser->yychar = PL_madskills ? madlex() : yylex(); #else parser->yychar = yylex(); + /*PerlIO_printf(PerlIO_stdout(),"JCG: yylex returns %d: '%c'\n", (int) parser->yychar, parser->yychar);*/ #endif # ifdef EBCDIC -- Perl5 Master Repository
