Pristine Ack-5.5
[Ack-5.5.git] / modules / src / em_code / bhcst.c
1 #include "em_private.h"
2
3 /* $Id: bhcst.c,v 1.4 1994/06/24 11:09:18 ceriel Exp $ */
4
5 void
6 CC_bhcst(op, n, w, i)
7         arith n;
8         arith w;
9         int i;
10 {
11         /*      BSS or HOL with size n, initial value a cst w, and flag i
12         */
13         PS(op);
14         CST(n);
15         COMMA();
16         CST(w);
17         COMMA();
18         CST((arith) i);
19         NL();
20 }