From e0c4e4b686c2ede58b759cf875e39967022c743a Mon Sep 17 00:00:00 2001
From: keie <none@none>
Date: Mon, 4 Mar 1985 16:11:41 +0000
Subject: [PATCH] Added execv and execle.

---
 mach/pmds4/libsys/exec.s | 24 +++++++++++++++++++++++-
 1 file changed, 23 insertions(+), 1 deletion(-)

diff --git a/mach/pmds4/libsys/exec.s b/mach/pmds4/libsys/exec.s
index 8e38e94c5..124910f34 100644
--- a/mach/pmds4/libsys/exec.s
+++ b/mach/pmds4/libsys/exec.s
@@ -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