1984-12-14 15:52:15 +00:00
|
|
|
.define _execl
|
1985-06-04 11:18:09 +00:00
|
|
|
.sect .text
|
|
|
|
|
.sect .rom
|
|
|
|
|
.sect .data
|
|
|
|
|
.sect .bss
|
1984-12-14 15:52:15 +00:00
|
|
|
.extern _execl
|
1985-07-19 13:43:03 +00:00
|
|
|
.sect .text
|
1984-12-14 15:52:15 +00:00
|
|
|
_execl: link a6,#0
|
|
|
|
|
tst.b -132(sp)
|
|
|
|
|
move.l _environ,-(sp)
|
|
|
|
|
pea 12(sp)
|
|
|
|
|
move.l 8(a6),-(sp)
|
|
|
|
|
jsr _execve
|
|
|
|
|
add.l #0xC,sp
|
|
|
|
|
unlk a6
|
|
|
|
|
rts
|
