1: # include "e.h"
2:
3: setsize(p) /* set size as found in p */
4: char *p;
5: {
6: if (*p == '+')
7: ps += atoi(p+1);
8: else if (*p == '-')
9: ps -= atoi(p+1);
10: else
11: ps = atoi(p);
12: if(dbg)printf(".\tsetsize %s; ps = %d\n", p, ps);
13: }
14:
15: size(p1, p2) int p1, p2; {
16: /* old size in p1, new in ps */
17: int effps, effp1;
18:
19: yyval = p2;
20: if(dbg)printf(".\tb:sb: S%d <- \\s%d S%d \\s%d; b=%d, h=%d\n",
21: yyval, ps, p2, p1, ebase[yyval], eht[yyval]);
22: effps = EFFPS(ps);
23: effp1 = EFFPS(p1);
24: printf(".ds %d \\s%d\\*(%d\\s%d\n",
25: yyval, effps, p2, effp1);
26: ps = p1;
27: }
28:
29: globsize() {
30: char temp[20];
31:
32: getstr(temp, 20);
33: if (temp[0] == '+')
34: gsize += atoi(temp+1);
35: else if (temp[0] == '-')
36: gsize -= atoi(temp+1);
37: else
38: gsize = atoi(temp);
39: yyval = eqnreg = 0;
40: setps(gsize);
41: ps = gsize;
42: if (gsize >= 12) /* sub and sup size change */
43: deltaps = gsize / 4;
44: else
45: deltaps = gsize / 3;
46: }
Defined functions
size
defined in line
15; used 1 times