xref: /csrg-svn/usr.bin/pascal/src/gram (revision 62230)
1*62230Sbostic"@(#)gram 8.1 06/06/93"
214637Sthien/yyval/s/int/union semstack/
314637Sthiens/ 0//
414637Sthien/yypv/s/int/union semstack/
5797Speter/\*yysterm\[]/,$d
6797Speter1;/yyactr/ka
7797Speter'a,$s/yypv/yyYpv/g
8797Speter'aa
914637Sthien	register union semstack *yyYpv;
1014637Sthien	register struct tnode *p, *q;
11797Speter	yyYpv = yypv;
12797Speter.
13807Speter1;/^##/-w! y.tab.h
14797Speter/^int yylval 0/d
15797Speter/extern int yychar,/s//extern/
16797Speter/yyclearin/d
17797Speter/yyerrok/d
18797Speter1;/^##/d
19797Speter$a
20797Speter
21797SpeteryyEactr(__np__, var)
22797Speterint __np__;
23797Speterchar *var;
24797Speter{
25797Speterswitch(__np__) {
26797Speterdefault:
27797Speterreturn (1);
2814753Sthienbreak;
29797Speter.
30805Speterg/case.*@@/s/@@//\
31797Speter.m$
32805Speterg/@@/ka\
33797Speter'a;?case?,?case?t$\
34797Speter'am$\
35797Spetera\
36797Speter}\
3714753Sthienbreak;
38797Speter$a
39797Speter}
4014753Sthien/*NOTREACHED*/
41797Speter}
42797Speter.
43805Speter1,$s/@@//
44797Speter/int nterms/d
45797Speter/int nnonter/d
46797Speter/int nstate/d
47797Speter/int yyerrval/d
4814697Sthien/yyact\[/s/ {/ = {/
4914697Sthien/yypact/s/ {/ = {/
5014697Sthien/yyr1/s/ {/ = {/
5114697Sthien/yyr2/s/ {/ = {/
5214697Sthien/yygo/s/ {/ = {/
5314697Sthien/yypgo/s/ {/ = {/
5414699Sthien/static/i
5514753Sthien#ifndef lint
5614699Sthien.
5714699Sthien/static/a
5814753Sthien#endif
5914753Sthien.
60807Speterw!
61797Speterq
62