xref: /original-bsd/usr.bin/pascal/src/gram (revision d6141097)
1"@(#)gram 1.3 08/27/80"
2/yyval/s//*&/
3/\*yysterm\[]/,$d
41;/yyactr/ka
5'a,$s/yypv/yyYpv/g
6'aa
7	register int **yyYpv;
8	register int *p, *q;
9	yyYpv = yypv;
10.
111;/^##/-w! y.tab.h
12/^int yylval 0/d
13/extern int yychar,/s//extern/
14/yyclearin/d
15/yyerrok/d
161;/^##/d
17$a
18
19yyEactr(__np__, var)
20int __np__;
21char *var;
22{
23switch(__np__) {
24default:
25return (1);
26.
27g/case.*@@/s/@@//\
28.m$
29g/@@/ka\
30'a;?case?,?case?t$\
31'am$\
32a\
33}\
34break;
35$a
36}
37}
38.
391,$s/@@//
40/int nterms/d
41/int nnonter/d
42/int nstate/d
43/int yyerrval/d
44w!
45q
46