#define YYERRCODE 256
short yylhs[] = { -1,
***************
-*** 1296,1306 ****
+*** 1303,1313 ****
int yyerrflag;
int yychar;
- short *yyssp;
- short yyss[YYSTACKSIZE];
- YYSTYPE yyvs[YYSTACKSIZE];
- #define yystacksize YYSTACKSIZE
- #line 602 "perly.y"
+ #line 624 "perly.y"
/* PROGRAM */
---- 1231,1236 ----
+--- 1238,1243 ----
***************
-*** 1309,1320 ****
---- 1239,1295 ----
+*** 1316,1327 ****
+--- 1246,1302 ----
#define YYACCEPT goto yyaccept
#define YYERROR goto yyerrlab
+
if (yys = getenv("YYDEBUG"))
{
***************
-*** 1329,1332 ****
---- 1304,1315 ----
+*** 1336,1339 ****
+--- 1311,1322 ----
yychar = (-1);
+ /*
yyssp = yyss;
yyvsp = yyvs;
***************
-*** 1344,1348 ****
+*** 1351,1355 ****
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
! printf("yydebug: state %d, reading %d (%s)\n", yystate,
yychar, yys);
}
---- 1327,1331 ----
+--- 1334,1338 ----
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
! fprintf(stderr, "yydebug: state %d, reading %d (%s)\n", yystate,
yychar, yys);
}
***************
-*** 1354,1363 ****
+*** 1361,1370 ****
#if YYDEBUG
if (yydebug)
! printf("yydebug: state %d, shifting to state %d\n",
! goto yyoverflow;
}
*++yyssp = yystate = yytable[yyn];
---- 1337,1360 ----
+--- 1344,1367 ----
#if YYDEBUG
if (yydebug)
! fprintf(stderr, "yydebug: state %d, shifting to state %d\n",
}
*++yyssp = yystate = yytable[yyn];
***************
-*** 1395,1404 ****
+*** 1402,1411 ****
#if YYDEBUG
if (yydebug)
! printf("yydebug: state %d, error recovery shifting\
! goto yyoverflow;
}
*++yyssp = yystate = yytable[yyn];
---- 1392,1416 ----
+--- 1399,1423 ----
#if YYDEBUG
if (yydebug)
! fprintf(stderr,
}
*++yyssp = yystate = yytable[yyn];
***************
-*** 1410,1415 ****
+*** 1417,1422 ****
#if YYDEBUG
if (yydebug)
! printf("yydebug: error recovery discarding state %d\n",
! *yyssp);
#endif
if (yyssp <= yyss) goto yyabort;
---- 1422,1428 ----
+--- 1429,1435 ----
#if YYDEBUG
if (yydebug)
! fprintf(stderr,
#endif
if (yyssp <= yyss) goto yyabort;
***************
-*** 1428,1433 ****
+*** 1435,1440 ****
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
! printf("yydebug: state %d, error recovery discards token %d (%s)\n",
! yystate, yychar, yys);
}
#endif
---- 1441,1447 ----
+--- 1448,1454 ----
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
! fprintf(stderr,
}
#endif
***************
-*** 1438,1442 ****
+*** 1445,1449 ****
#if YYDEBUG
if (yydebug)
! printf("yydebug: state %d, reducing by rule %d (%s)\n",
yystate, yyn, yyrule[yyn]);
#endif
---- 1452,1456 ----
+--- 1459,1463 ----
#if YYDEBUG
if (yydebug)
! fprintf(stderr, "yydebug: state %d, reducing by rule %d (%s)\n",
yystate, yyn, yyrule[yyn]);
#endif
***************
-*** 2185,2190 ****
+*** 2222,2227 ****
#if YYDEBUG
if (yydebug)
! printf("yydebug: after reduction, shifting from state 0 to\
! state %d\n", YYFINAL);
#endif
yystate = YYFINAL;
---- 2199,2205 ----
+--- 2236,2242 ----
#if YYDEBUG
if (yydebug)
! fprintf(stderr,
#endif
yystate = YYFINAL;
***************
-*** 2200,2204 ****
+*** 2237,2241 ****
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
! printf("yydebug: state %d, reading %d (%s)\n",
YYFINAL, yychar, yys);
}
---- 2215,2219 ----
+--- 2252,2256 ----
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
! fprintf(stderr, "yydebug: state %d, reading %d (%s)\n",
YYFINAL, yychar, yys);
}
***************
-*** 2215,2224 ****
+*** 2252,2261 ****
#if YYDEBUG
if (yydebug)
! printf("yydebug: after reduction, shifting from state %d \
! goto yyoverflow;
}
*++yyssp = yystate;
---- 2230,2254 ----
+--- 2267,2291 ----
#if YYDEBUG
if (yydebug)
! fprintf(stderr,
}
*++yyssp = yystate;
***************
-*** 2226,2233 ****
+*** 2263,2270 ****
goto yyloop;
yyoverflow:
! yyerror("yacc stack overflow");
yyaccept:
! return (0);
}
---- 2256,2263 ----
+--- 2293,2300 ----
goto yyloop;
yyoverflow:
! yyerror("Out of memory for yacc stack");