execl.s 231 B

12345678910111213141516
  1. .define _execl
  2. .sect .text
  3. .sect .rom
  4. .sect .data
  5. .sect .bss
  6. .extern _execl
  7. .sect .text
  8. _execl: link a6,#0
  9. tst.b -132(sp)
  10. move.l _environ,-(sp)
  11. pea 12(sp)
  12. move.l 8(a6),-(sp)
  13. jsr _execve
  14. add.l #0xC,sp
  15. unlk a6
  16. rts