fork.s 208 B

1234567891011121314151617
  1. .define _fork
  2. .extern _fork
  3. .sect .text
  4. .sect .rom
  5. .sect .data
  6. .sect .bss
  7. .sect .text
  8. _fork: move.l #0x2,d0
  9. trap #0
  10. bcc 1f ! 68020 way to do it
  11. jmp (cerror)
  12. 1:
  13. tst.b d1
  14. beq 2f
  15. clr.l d0
  16. 2:
  17. rts