unlink.s 165 B

1234567891011121314
  1. .define _unlink
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .sect .text
  7. .extern _unlink
  8. _unlink: trap #0
  9. .data2 0xA
  10. bcc 1f
  11. jmp cerror
  12. 1:
  13. clr.l d0
  14. rts