/* size.c 4.1 83/02/11 */
setsize(p
) /* set size as found in p */
if(dbg
)printf(".\tsetsize %s; ps = %d\n", p
, ps
);
size(p1
, p2
) int p1
, p2
; {
/* old size in p1, new in ps */
if(dbg
)printf(".\tb:sb: S%d <- \\s%d S%d \\s%d; b=%d, h=%d\n",
yyval
, ps
, p2
, p1
, ebase
[yyval
], eht
[yyval
]);
printf(".ds %d \\s%d\\*(%d\\s%d\n",
yyval
, effps
, p2
, effp1
);
if (gsize
>= 12) /* sub and sup size change */