execl.s 229 B

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