fixed some bugs

1987-11-02 14:23:38 +00:00 · 1987-11-02 14:23:38 +00:00 · ab5a0efd48
parent 017871b025
commit ab5a0efd48
2 changed files with 10 additions and 5 deletions
--- 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
--- 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