crscon.c 167 B

12345678910111213141516
  1. #include "em_private.h"
  2. /* $Id$ */
  3. void
  4. CC_crscon(op, v, s)
  5. char *v;
  6. arith s;
  7. {
  8. /* CON or ROM with argument SCON(v,z)
  9. */
  10. PS(op);
  11. SCON(v, s);
  12. CEND();
  13. NL();
  14. }