-*** perly.c.orig Tue Nov 14 17:16:49 1995
---- perly.c Tue Nov 14 17:17:44 1995
+*** perly.c.orig Sun Jul 7 23:27:45 1996
+--- perly.c Sun Jul 7 23:27:46 1996
***************
*** 12,82 ****
deprecate("\"do\" to call subroutines");
31, 0, 5, 3, 6, 6, 6, 7, 7, 7,
--- 12,17 ----
***************
-*** 1338,1350 ****
+*** 1375,1387 ****
int yynerrs;
int yyerrflag;
int yychar;
- short yyss[YYSTACKSIZE];
- YYSTYPE yyvs[YYSTACKSIZE];
- #define yystacksize YYSTACKSIZE
- #line 563 "perly.y"
+ #line 571 "perly.y"
/* PROGRAM */
- #line 1351 "y.tab.c"
---- 1273,1280 ----
+ #line 1388 "y.tab.c"
+--- 1310,1317 ----
***************
-*** 1351,1364 ****
---- 1281,1339 ----
+*** 1388,1401 ****
+--- 1318,1376 ----
#define YYABORT goto yyabort
#define YYACCEPT goto yyaccept
#define YYERROR goto yyerrlab
{
yyn = *yys;
***************
-*** 1371,1376 ****
---- 1346,1359 ----
+*** 1408,1413 ****
+--- 1383,1396 ----
yyerrflag = 0;
yychar = (-1);
yyvsp = yyvs;
*yyssp = yystate = 0;
***************
-*** 1386,1392 ****
+*** 1423,1429 ****
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
yychar, yys);
}
#endif
---- 1369,1375 ----
+--- 1406,1412 ----
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
}
#endif
***************
-*** 1396,1407 ****
+*** 1433,1444 ****
{
#if YYDEBUG
if (yydebug)
}
*++yyssp = yystate = yytable[yyn];
*++yyvsp = yylval;
---- 1379,1404 ----
+--- 1416,1441 ----
{
#if YYDEBUG
if (yydebug)
*++yyssp = yystate = yytable[yyn];
*++yyvsp = yylval;
***************
-*** 1437,1448 ****
+*** 1474,1485 ****
{
#if YYDEBUG
if (yydebug)
}
*++yyssp = yystate = yytable[yyn];
*++yyvsp = yylval;
---- 1434,1460 ----
+--- 1471,1497 ----
{
#if YYDEBUG
if (yydebug)
*++yyssp = yystate = yytable[yyn];
*++yyvsp = yylval;
***************
-*** 1452,1459 ****
+*** 1489,1496 ****
{
#if YYDEBUG
if (yydebug)
#endif
if (yyssp <= yyss) goto yyabort;
--yyssp;
---- 1464,1472 ----
+--- 1501,1509 ----
{
#if YYDEBUG
if (yydebug)
if (yyssp <= yyss) goto yyabort;
--yyssp;
***************
-*** 1470,1477 ****
+*** 1507,1514 ****
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
}
#endif
yychar = (-1);
---- 1483,1491 ----
+--- 1520,1528 ----
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
#endif
yychar = (-1);
***************
-*** 1480,1486 ****
+*** 1517,1523 ****
yyreduce:
#if YYDEBUG
if (yydebug)
yystate, yyn, yyrule[yyn]);
#endif
yym = yylen[yyn];
---- 1494,1500 ----
+--- 1531,1537 ----
yyreduce:
#if YYDEBUG
if (yydebug)
#endif
yym = yylen[yyn];
***************
-*** 2189,2196 ****
+*** 2236,2243 ****
{
#if YYDEBUG
if (yydebug)
#endif
yystate = YYFINAL;
*++yyssp = YYFINAL;
---- 2203,2211 ----
+--- 2250,2258 ----
{
#if YYDEBUG
if (yydebug)
yystate = YYFINAL;
*++yyssp = YYFINAL;
***************
-*** 2204,2210 ****
+*** 2251,2257 ****
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
YYFINAL, yychar, yys);
}
#endif
---- 2219,2225 ----
+--- 2266,2272 ----
yys = 0;
if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
if (!yys) yys = "illegal-symbol";
}
#endif
***************
-*** 2219,2238 ****
+*** 2266,2285 ****
yystate = yydgoto[yym];
#if YYDEBUG
if (yydebug)
yyaccept:
! return (0);
}
---- 2234,2268 ----
+--- 2281,2315 ----
yystate = yydgoto[yym];
#if YYDEBUG
if (yydebug)