crfcon.c 175 B

123456789101112131415
  1. #include "em_private.h"
  2. /* $Header$ */
  3. CC_crfcon(op, v, s)
  4. char *v;
  5. arith s;
  6. {
  7. /* CON or ROM with argument FCON(v,z)
  8. */
  9. PS(op);
  10. WCON(sp_fcon, v, s);
  11. CEND();
  12. NL();
  13. }