read.s 149 B

123456789101112
  1. .sect .text; .sect .rom; .sect .data; .sect .bss
  2. .sect .text
  3. read = 3
  4. .define _read
  5. _read:
  6. .data2 0x0000
  7. chmk $read
  8. bcc 1f
  9. jmp cerror
  10. 1:
  11. ret