bhfcon.c 273 B

12345678910111213141516171819202122
  1. #include "em_private.h"
  2. /* $Id$ */
  3. void
  4. CC_bhfcon(op, n, s, sz, i)
  5. arith n;
  6. char *s;
  7. arith sz;
  8. int i;
  9. {
  10. /* BSS or HOL with size n, initial value an FCON (s, sz),
  11. and flag i
  12. */
  13. PS(op);
  14. CST(n);
  15. COMMA();
  16. WCON(sp_fcon, s, sz);
  17. COMMA();
  18. CST((arith) i);
  19. NL();
  20. }