int yylen;
#ifdef PERL_MAD
- /*if (PL_madskills)
- return madparse();*/
+ if (PL_madskills)
+ return madparse();
#endif
YYDPRINTF ((Perl_debug_log, "Starting parse\n"));
if (yychar == YYEMPTY) {
YYDPRINTF ((Perl_debug_log, "Reading a token: "));
#ifdef PERL_MAD
- yychar = /*PL_madskills ? madlex() :*/ yylex();
+ yychar = PL_madskills ? madlex() : yylex();
#else
yychar = yylex();
#endif