diff --git a/mach/m68020/libsys/dup2.s b/mach/m68020/libsys/dup2.s
index dcdf0e9c1..bd4d753f2 100644
--- a/mach/m68020/libsys/dup2.s
+++ b/mach/m68020/libsys/dup2.s
@@ -5,6 +5,12 @@
 .sect .data
 .sect .bss
 .sect .text
-_dup2:		move.l #0x29,d0
-		add.l #0x40,(4,sp)	! ???
-		jmp (call)
+_dup2:
+link	a6,#0
+move.l (12,a6),-(sp)
+move.l #0,-(sp)
+move.l (8,a6),-(sp)
+jsr _fcntl
+add.l #12,sp
+unlk a6
+rts
diff --git a/mach/m68020/libsys/execl.s b/mach/m68020/libsys/execl.s
index 147716a6b..cded22519 100644
--- a/mach/m68020/libsys/execl.s
+++ b/mach/m68020/libsys/execl.s
@@ -6,9 +6,8 @@
 .sect .bss
 .sect .text
 _execl:		link a6,#0
-		tst.b (-132,sp)
 		move.l (_environ),-(sp)
-		pea (12,sp)
+		pea (12,a6)
 		move.l (8,a6),-(sp)
 		jsr (_execve)
 		add.l #0xC,sp