Added execv and execle.
authorkeie <none@none>
Mon, 4 Mar 1985 16:11:41 +0000 (16:11 +0000)
committerkeie <none@none>
Mon, 4 Mar 1985 16:11:41 +0000 (16:11 +0000)
mach/pmds4/libsys/exec.s

index 8e38e94..124910f 100644 (file)
@@ -1,13 +1,35 @@
 .define _execl
 .define _execve
+.define _execv
+.define _execle
 .extern _execl
 .extern _execve
+.extern _execv
+.extern _execle
 _execl:                tst.b -48(sp)
                link a6,#0
                move.l _environ,-(sp)
+pusha:
                pea 12(a6)
+pushp:
                move.l 8(a6),-(sp)
                jsr _execve
+               unlk    a6
+               rts
 _execve:       trap #0
-.short 59
+.short 3B
                jmp cerror
+_execv:                
+               tst.b -48(sp)
+               link a6,#0
+               move.l _environ,-(sp)
+               move.l  12(a6),-(sp)
+               br      pushp
+_execle:       tst.b   -48(sp)
+               link    a6,#0
+               lea     12(a6),a0
+1:
+               tst.l   (a0)+
+               bne     1b
+               move.l  a0,-(sp)
+               br      pusha